{- This file was auto-generated from temporal/sdk/core/external_data/external_data.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Temporal.Sdk.Core.ExternalData.ExternalData (
        LocalActivityMarkerData(), PatchedMarkerData()
    ) 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
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.seq' @:: Lens' LocalActivityMarkerData Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.attempt' @:: Lens' LocalActivityMarkerData Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.activityId' @:: Lens' LocalActivityMarkerData Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.activityType' @:: Lens' LocalActivityMarkerData Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.completeTime' @:: Lens' LocalActivityMarkerData Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.maybe'completeTime' @:: Lens' LocalActivityMarkerData (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.backoff' @:: Lens' LocalActivityMarkerData Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.maybe'backoff' @:: Lens' LocalActivityMarkerData (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.originalScheduleTime' @:: Lens' LocalActivityMarkerData Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.maybe'originalScheduleTime' @:: Lens' LocalActivityMarkerData (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@ -}
data LocalActivityMarkerData
  = LocalActivityMarkerData'_constructor {LocalActivityMarkerData -> Word32
_LocalActivityMarkerData'seq :: !Data.Word.Word32,
                                          LocalActivityMarkerData -> Word32
_LocalActivityMarkerData'attempt :: !Data.Word.Word32,
                                          LocalActivityMarkerData -> Text
_LocalActivityMarkerData'activityId :: !Data.Text.Text,
                                          LocalActivityMarkerData -> Text
_LocalActivityMarkerData'activityType :: !Data.Text.Text,
                                          LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'completeTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                          LocalActivityMarkerData -> Maybe Duration
_LocalActivityMarkerData'backoff :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                          LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'originalScheduleTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                          LocalActivityMarkerData -> FieldSet
_LocalActivityMarkerData'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
(LocalActivityMarkerData -> LocalActivityMarkerData -> Bool)
-> (LocalActivityMarkerData -> LocalActivityMarkerData -> Bool)
-> Eq LocalActivityMarkerData
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
== :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
$c/= :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
/= :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
Prelude.Eq, Eq LocalActivityMarkerData
Eq LocalActivityMarkerData =>
(LocalActivityMarkerData -> LocalActivityMarkerData -> Ordering)
-> (LocalActivityMarkerData -> LocalActivityMarkerData -> Bool)
-> (LocalActivityMarkerData -> LocalActivityMarkerData -> Bool)
-> (LocalActivityMarkerData -> LocalActivityMarkerData -> Bool)
-> (LocalActivityMarkerData -> LocalActivityMarkerData -> Bool)
-> (LocalActivityMarkerData
    -> LocalActivityMarkerData -> LocalActivityMarkerData)
-> (LocalActivityMarkerData
    -> LocalActivityMarkerData -> LocalActivityMarkerData)
-> Ord LocalActivityMarkerData
LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
LocalActivityMarkerData -> LocalActivityMarkerData -> Ordering
LocalActivityMarkerData
-> LocalActivityMarkerData -> LocalActivityMarkerData
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: LocalActivityMarkerData -> LocalActivityMarkerData -> Ordering
compare :: LocalActivityMarkerData -> LocalActivityMarkerData -> Ordering
$c< :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
< :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
$c<= :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
<= :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
$c> :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
> :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
$c>= :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
>= :: LocalActivityMarkerData -> LocalActivityMarkerData -> Bool
$cmax :: LocalActivityMarkerData
-> LocalActivityMarkerData -> LocalActivityMarkerData
max :: LocalActivityMarkerData
-> LocalActivityMarkerData -> LocalActivityMarkerData
$cmin :: LocalActivityMarkerData
-> LocalActivityMarkerData -> LocalActivityMarkerData
min :: LocalActivityMarkerData
-> LocalActivityMarkerData -> LocalActivityMarkerData
Prelude.Ord)
instance Prelude.Show LocalActivityMarkerData where
  showsPrec :: Int -> LocalActivityMarkerData -> ShowS
showsPrec Int
_ LocalActivityMarkerData
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (LocalActivityMarkerData -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort LocalActivityMarkerData
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Word32)
-> (LocalActivityMarkerData -> Word32 -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData LocalActivityMarkerData Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Word32
_LocalActivityMarkerData'seq
           (\ LocalActivityMarkerData
x__ Word32
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "attempt" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Word32 -> f Word32)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "attempt"
_
    = ((Word32 -> f Word32)
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Word32)
-> (LocalActivityMarkerData -> Word32 -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData LocalActivityMarkerData Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Word32
_LocalActivityMarkerData'attempt
           (\ LocalActivityMarkerData
x__ Word32
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'attempt = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Text)
-> (LocalActivityMarkerData -> Text -> LocalActivityMarkerData)
-> Lens LocalActivityMarkerData LocalActivityMarkerData Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Text
_LocalActivityMarkerData'activityId
           (\ LocalActivityMarkerData
x__ Text
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "activityType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityType"
-> (Text -> f Text)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "activityType"
_
    = ((Text -> f Text)
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Text)
-> (LocalActivityMarkerData -> Text -> LocalActivityMarkerData)
-> Lens LocalActivityMarkerData LocalActivityMarkerData Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Text
_LocalActivityMarkerData'activityType
           (\ LocalActivityMarkerData
x__ Text
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'activityType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "completeTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completeTime"
-> (Timestamp -> f Timestamp)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "completeTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Maybe Timestamp)
-> (LocalActivityMarkerData
    -> Maybe Timestamp -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData
     LocalActivityMarkerData
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'completeTime
           (\ LocalActivityMarkerData
x__ Maybe Timestamp
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'completeTime = 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 LocalActivityMarkerData "maybe'completeTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'completeTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "maybe'completeTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Maybe Timestamp)
-> (LocalActivityMarkerData
    -> Maybe Timestamp -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData
     LocalActivityMarkerData
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'completeTime
           (\ LocalActivityMarkerData
x__ Maybe Timestamp
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'completeTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "backoff" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "backoff"
-> (Duration -> f Duration)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "backoff"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Maybe Duration)
-> (LocalActivityMarkerData
    -> Maybe Duration -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData
     LocalActivityMarkerData
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Maybe Duration
_LocalActivityMarkerData'backoff
           (\ LocalActivityMarkerData
x__ Maybe Duration
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'backoff = 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 LocalActivityMarkerData "maybe'backoff" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'backoff"
-> (Maybe Duration -> f (Maybe Duration))
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "maybe'backoff"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Maybe Duration)
-> (LocalActivityMarkerData
    -> Maybe Duration -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData
     LocalActivityMarkerData
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Maybe Duration
_LocalActivityMarkerData'backoff
           (\ LocalActivityMarkerData
x__ Maybe Duration
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'backoff = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "originalScheduleTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "originalScheduleTime"
-> (Timestamp -> f Timestamp)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "originalScheduleTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Maybe Timestamp)
-> (LocalActivityMarkerData
    -> Maybe Timestamp -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData
     LocalActivityMarkerData
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'originalScheduleTime
           (\ LocalActivityMarkerData
x__ Maybe Timestamp
y__
              -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'originalScheduleTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField LocalActivityMarkerData "maybe'originalScheduleTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'originalScheduleTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
fieldOf Proxy# "maybe'originalScheduleTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> LocalActivityMarkerData -> f LocalActivityMarkerData)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> LocalActivityMarkerData
-> f LocalActivityMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((LocalActivityMarkerData -> Maybe Timestamp)
-> (LocalActivityMarkerData
    -> Maybe Timestamp -> LocalActivityMarkerData)
-> Lens
     LocalActivityMarkerData
     LocalActivityMarkerData
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'originalScheduleTime
           (\ LocalActivityMarkerData
x__ Maybe Timestamp
y__
              -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'originalScheduleTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message LocalActivityMarkerData where
  messageName :: Proxy LocalActivityMarkerData -> Text
messageName Proxy LocalActivityMarkerData
_
    = String -> Text
Data.Text.pack String
"coresdk.external_data.LocalActivityMarkerData"
  packedMessageDescriptor :: Proxy LocalActivityMarkerData -> ByteString
packedMessageDescriptor Proxy LocalActivityMarkerData
_
    = ByteString
"\n\
      \\ETBLocalActivityMarkerData\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\CAN\n\
      \\aattempt\CAN\STX \SOH(\rR\aattempt\DC2\US\n\
      \\vactivity_id\CAN\ETX \SOH(\tR\n\
      \activityId\DC2#\n\
      \\ractivity_type\CAN\EOT \SOH(\tR\factivityType\DC2?\n\
      \\rcomplete_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\fcompleteTime\DC23\n\
      \\abackoff\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\abackoff\DC2P\n\
      \\SYNoriginal_schedule_time\CAN\a \SOH(\v2\SUB.google.protobuf.TimestampR\DC4originalScheduleTime"
  packedFileDescriptor :: Proxy LocalActivityMarkerData -> ByteString
packedFileDescriptor Proxy LocalActivityMarkerData
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor LocalActivityMarkerData)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor LocalActivityMarkerData
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor LocalActivityMarkerData Word32
-> FieldDescriptor LocalActivityMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     LocalActivityMarkerData LocalActivityMarkerData Word32 Word32
-> FieldAccessor LocalActivityMarkerData Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq")) ::
              Data.ProtoLens.FieldDescriptor LocalActivityMarkerData
        attempt__field_descriptor :: FieldDescriptor LocalActivityMarkerData
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor LocalActivityMarkerData Word32
-> FieldDescriptor LocalActivityMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attempt"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     LocalActivityMarkerData LocalActivityMarkerData Word32 Word32
-> FieldAccessor LocalActivityMarkerData Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
              Data.ProtoLens.FieldDescriptor LocalActivityMarkerData
        activityId__field_descriptor :: FieldDescriptor LocalActivityMarkerData
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor LocalActivityMarkerData Text
-> FieldDescriptor LocalActivityMarkerData
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 LocalActivityMarkerData LocalActivityMarkerData Text Text
-> FieldAccessor LocalActivityMarkerData Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.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 LocalActivityMarkerData
        activityType__field_descriptor :: FieldDescriptor LocalActivityMarkerData
activityType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor LocalActivityMarkerData Text
-> FieldDescriptor LocalActivityMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_type"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens LocalActivityMarkerData LocalActivityMarkerData Text Text
-> FieldAccessor LocalActivityMarkerData Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityType")) ::
              Data.ProtoLens.FieldDescriptor LocalActivityMarkerData
        completeTime__field_descriptor :: FieldDescriptor LocalActivityMarkerData
completeTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor LocalActivityMarkerData Timestamp
-> FieldDescriptor LocalActivityMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"complete_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  LocalActivityMarkerData
  LocalActivityMarkerData
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor LocalActivityMarkerData 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'completeTime")) ::
              Data.ProtoLens.FieldDescriptor LocalActivityMarkerData
        backoff__field_descriptor :: FieldDescriptor LocalActivityMarkerData
backoff__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor LocalActivityMarkerData Duration
-> FieldDescriptor LocalActivityMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"backoff"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  LocalActivityMarkerData
  LocalActivityMarkerData
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor LocalActivityMarkerData 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'backoff")) ::
              Data.ProtoLens.FieldDescriptor LocalActivityMarkerData
        originalScheduleTime__field_descriptor :: FieldDescriptor LocalActivityMarkerData
originalScheduleTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor LocalActivityMarkerData Timestamp
-> FieldDescriptor LocalActivityMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"original_schedule_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  LocalActivityMarkerData
  LocalActivityMarkerData
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor LocalActivityMarkerData Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'originalScheduleTime")) ::
              Data.ProtoLens.FieldDescriptor LocalActivityMarkerData
      in
        [(Tag, FieldDescriptor LocalActivityMarkerData)]
-> Map Tag (FieldDescriptor LocalActivityMarkerData)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor LocalActivityMarkerData
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor LocalActivityMarkerData
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor LocalActivityMarkerData
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor LocalActivityMarkerData
activityType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor LocalActivityMarkerData
completeTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor LocalActivityMarkerData
backoff__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor LocalActivityMarkerData
originalScheduleTime__field_descriptor)]
  unknownFields :: Lens' LocalActivityMarkerData FieldSet
unknownFields
    = (LocalActivityMarkerData -> FieldSet)
-> (LocalActivityMarkerData -> FieldSet -> LocalActivityMarkerData)
-> Lens' LocalActivityMarkerData FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        LocalActivityMarkerData -> FieldSet
_LocalActivityMarkerData'_unknownFields
        (\ LocalActivityMarkerData
x__ FieldSet
y__ -> LocalActivityMarkerData
x__ {_LocalActivityMarkerData'_unknownFields = y__})
  defMessage :: LocalActivityMarkerData
defMessage
    = LocalActivityMarkerData'_constructor
        {_LocalActivityMarkerData'seq :: Word32
_LocalActivityMarkerData'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _LocalActivityMarkerData'attempt :: Word32
_LocalActivityMarkerData'attempt = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _LocalActivityMarkerData'activityId :: Text
_LocalActivityMarkerData'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _LocalActivityMarkerData'activityType :: Text
_LocalActivityMarkerData'activityType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _LocalActivityMarkerData'completeTime :: Maybe Timestamp
_LocalActivityMarkerData'completeTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _LocalActivityMarkerData'backoff :: Maybe Duration
_LocalActivityMarkerData'backoff = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _LocalActivityMarkerData'originalScheduleTime :: Maybe Timestamp
_LocalActivityMarkerData'originalScheduleTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _LocalActivityMarkerData'_unknownFields :: FieldSet
_LocalActivityMarkerData'_unknownFields = []}
  parseMessage :: Parser LocalActivityMarkerData
parseMessage
    = let
        loop ::
          LocalActivityMarkerData
          -> Data.ProtoLens.Encoding.Bytes.Parser LocalActivityMarkerData
        loop :: LocalActivityMarkerData -> Parser LocalActivityMarkerData
loop LocalActivityMarkerData
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
8 -> do y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") y x)
                        Word64
16
                          -> do y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"attempt"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") 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_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"activityType") 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
"complete_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"completeTime") 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
"backoff"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"backoff") y x)
                        Word64
58
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"original_schedule_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"originalScheduleTime") y x)
                        Word64
wire
                          -> do !y <- 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 LocalActivityMarkerData
-> String -> Parser LocalActivityMarkerData
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do LocalActivityMarkerData -> Parser LocalActivityMarkerData
loop LocalActivityMarkerData
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"LocalActivityMarkerData"
  buildMessage :: LocalActivityMarkerData -> Builder
buildMessage
    = \ LocalActivityMarkerData
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  LocalActivityMarkerData
  LocalActivityMarkerData
  Word32
  Word32
-> LocalActivityMarkerData -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") LocalActivityMarkerData
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Word32
_v = FoldLike
  Word32
  LocalActivityMarkerData
  LocalActivityMarkerData
  Word32
  Word32
-> LocalActivityMarkerData -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") LocalActivityMarkerData
_x
                 in
                   if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v
                        = FoldLike
  Text LocalActivityMarkerData LocalActivityMarkerData Text Text
-> LocalActivityMarkerData -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") LocalActivityMarkerData
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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 LocalActivityMarkerData LocalActivityMarkerData Text Text
-> LocalActivityMarkerData -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityType") LocalActivityMarkerData
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
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 Timestamp)
  LocalActivityMarkerData
  LocalActivityMarkerData
  (Maybe Timestamp)
  (Maybe Timestamp)
-> LocalActivityMarkerData -> 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'completeTime") LocalActivityMarkerData
_x
                          of
                            Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Timestamp
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe Duration)
  LocalActivityMarkerData
  LocalActivityMarkerData
  (Maybe Duration)
  (Maybe Duration)
-> LocalActivityMarkerData -> 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'backoff") LocalActivityMarkerData
_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 Timestamp)
  LocalActivityMarkerData
  LocalActivityMarkerData
  (Maybe Timestamp)
  (Maybe Timestamp)
-> LocalActivityMarkerData -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'originalScheduleTime") LocalActivityMarkerData
_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
58)
                                         ((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
  LocalActivityMarkerData
  LocalActivityMarkerData
  FieldSet
  FieldSet
-> LocalActivityMarkerData -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  LocalActivityMarkerData
  LocalActivityMarkerData
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' LocalActivityMarkerData FieldSet
Data.ProtoLens.unknownFields LocalActivityMarkerData
_x))))))))
instance Control.DeepSeq.NFData LocalActivityMarkerData where
  rnf :: LocalActivityMarkerData -> ()
rnf
    = \ LocalActivityMarkerData
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (LocalActivityMarkerData -> FieldSet
_LocalActivityMarkerData'_unknownFields LocalActivityMarkerData
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (LocalActivityMarkerData -> Word32
_LocalActivityMarkerData'seq LocalActivityMarkerData
x__)
                (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (LocalActivityMarkerData -> Word32
_LocalActivityMarkerData'attempt LocalActivityMarkerData
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (LocalActivityMarkerData -> Text
_LocalActivityMarkerData'activityId LocalActivityMarkerData
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (LocalActivityMarkerData -> Text
_LocalActivityMarkerData'activityType LocalActivityMarkerData
x__)
                         (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'completeTime LocalActivityMarkerData
x__)
                            (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (LocalActivityMarkerData -> Maybe Duration
_LocalActivityMarkerData'backoff LocalActivityMarkerData
x__)
                               (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (LocalActivityMarkerData -> Maybe Timestamp
_LocalActivityMarkerData'originalScheduleTime LocalActivityMarkerData
x__) ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.id' @:: Lens' PatchedMarkerData Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.ExternalData.ExternalData_Fields.deprecated' @:: Lens' PatchedMarkerData Prelude.Bool@ -}
data PatchedMarkerData
  = PatchedMarkerData'_constructor {PatchedMarkerData -> Text
_PatchedMarkerData'id :: !Data.Text.Text,
                                    PatchedMarkerData -> Bool
_PatchedMarkerData'deprecated :: !Prelude.Bool,
                                    PatchedMarkerData -> FieldSet
_PatchedMarkerData'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PatchedMarkerData -> PatchedMarkerData -> Bool
(PatchedMarkerData -> PatchedMarkerData -> Bool)
-> (PatchedMarkerData -> PatchedMarkerData -> Bool)
-> Eq PatchedMarkerData
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PatchedMarkerData -> PatchedMarkerData -> Bool
== :: PatchedMarkerData -> PatchedMarkerData -> Bool
$c/= :: PatchedMarkerData -> PatchedMarkerData -> Bool
/= :: PatchedMarkerData -> PatchedMarkerData -> Bool
Prelude.Eq, Eq PatchedMarkerData
Eq PatchedMarkerData =>
(PatchedMarkerData -> PatchedMarkerData -> Ordering)
-> (PatchedMarkerData -> PatchedMarkerData -> Bool)
-> (PatchedMarkerData -> PatchedMarkerData -> Bool)
-> (PatchedMarkerData -> PatchedMarkerData -> Bool)
-> (PatchedMarkerData -> PatchedMarkerData -> Bool)
-> (PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData)
-> (PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData)
-> Ord PatchedMarkerData
PatchedMarkerData -> PatchedMarkerData -> Bool
PatchedMarkerData -> PatchedMarkerData -> Ordering
PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: PatchedMarkerData -> PatchedMarkerData -> Ordering
compare :: PatchedMarkerData -> PatchedMarkerData -> Ordering
$c< :: PatchedMarkerData -> PatchedMarkerData -> Bool
< :: PatchedMarkerData -> PatchedMarkerData -> Bool
$c<= :: PatchedMarkerData -> PatchedMarkerData -> Bool
<= :: PatchedMarkerData -> PatchedMarkerData -> Bool
$c> :: PatchedMarkerData -> PatchedMarkerData -> Bool
> :: PatchedMarkerData -> PatchedMarkerData -> Bool
$c>= :: PatchedMarkerData -> PatchedMarkerData -> Bool
>= :: PatchedMarkerData -> PatchedMarkerData -> Bool
$cmax :: PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData
max :: PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData
$cmin :: PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData
min :: PatchedMarkerData -> PatchedMarkerData -> PatchedMarkerData
Prelude.Ord)
instance Prelude.Show PatchedMarkerData where
  showsPrec :: Int -> PatchedMarkerData -> ShowS
showsPrec Int
_ PatchedMarkerData
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PatchedMarkerData -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PatchedMarkerData
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PatchedMarkerData "id" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "id"
-> (Text -> f Text) -> PatchedMarkerData -> f PatchedMarkerData
fieldOf Proxy# "id"
_
    = ((Text -> f Text) -> PatchedMarkerData -> f PatchedMarkerData)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PatchedMarkerData
-> f PatchedMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchedMarkerData -> Text)
-> (PatchedMarkerData -> Text -> PatchedMarkerData)
-> Lens PatchedMarkerData PatchedMarkerData Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchedMarkerData -> Text
_PatchedMarkerData'id
           (\ PatchedMarkerData
x__ Text
y__ -> PatchedMarkerData
x__ {_PatchedMarkerData'id = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PatchedMarkerData "deprecated" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "deprecated"
-> (Bool -> f Bool) -> PatchedMarkerData -> f PatchedMarkerData
fieldOf Proxy# "deprecated"
_
    = ((Bool -> f Bool) -> PatchedMarkerData -> f PatchedMarkerData)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> PatchedMarkerData
-> f PatchedMarkerData
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchedMarkerData -> Bool)
-> (PatchedMarkerData -> Bool -> PatchedMarkerData)
-> Lens PatchedMarkerData PatchedMarkerData Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchedMarkerData -> Bool
_PatchedMarkerData'deprecated
           (\ PatchedMarkerData
x__ Bool
y__ -> PatchedMarkerData
x__ {_PatchedMarkerData'deprecated = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PatchedMarkerData where
  messageName :: Proxy PatchedMarkerData -> Text
messageName Proxy PatchedMarkerData
_
    = String -> Text
Data.Text.pack String
"coresdk.external_data.PatchedMarkerData"
  packedMessageDescriptor :: Proxy PatchedMarkerData -> ByteString
packedMessageDescriptor Proxy PatchedMarkerData
_
    = ByteString
"\n\
      \\DC1PatchedMarkerData\DC2\SO\n\
      \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\RS\n\
      \\n\
      \deprecated\CAN\STX \SOH(\bR\n\
      \deprecated"
  packedFileDescriptor :: Proxy PatchedMarkerData -> ByteString
packedFileDescriptor Proxy PatchedMarkerData
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PatchedMarkerData)
fieldsByTag
    = let
        id__field_descriptor :: FieldDescriptor PatchedMarkerData
id__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PatchedMarkerData Text
-> FieldDescriptor PatchedMarkerData
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 PatchedMarkerData PatchedMarkerData Text Text
-> FieldAccessor PatchedMarkerData Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.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 PatchedMarkerData
        deprecated__field_descriptor :: FieldDescriptor PatchedMarkerData
deprecated__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor PatchedMarkerData Bool
-> FieldDescriptor PatchedMarkerData
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"deprecated"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (WireDefault Bool
-> Lens PatchedMarkerData PatchedMarkerData Bool Bool
-> FieldAccessor PatchedMarkerData Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deprecated")) ::
              Data.ProtoLens.FieldDescriptor PatchedMarkerData
      in
        [(Tag, FieldDescriptor PatchedMarkerData)]
-> Map Tag (FieldDescriptor PatchedMarkerData)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PatchedMarkerData
id__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PatchedMarkerData
deprecated__field_descriptor)]
  unknownFields :: Lens' PatchedMarkerData FieldSet
unknownFields
    = (PatchedMarkerData -> FieldSet)
-> (PatchedMarkerData -> FieldSet -> PatchedMarkerData)
-> Lens' PatchedMarkerData FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PatchedMarkerData -> FieldSet
_PatchedMarkerData'_unknownFields
        (\ PatchedMarkerData
x__ FieldSet
y__ -> PatchedMarkerData
x__ {_PatchedMarkerData'_unknownFields = y__})
  defMessage :: PatchedMarkerData
defMessage
    = PatchedMarkerData'_constructor
        {_PatchedMarkerData'id :: Text
_PatchedMarkerData'id = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PatchedMarkerData'deprecated :: Bool
_PatchedMarkerData'deprecated = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PatchedMarkerData'_unknownFields :: FieldSet
_PatchedMarkerData'_unknownFields = []}
  parseMessage :: Parser PatchedMarkerData
parseMessage
    = let
        loop ::
          PatchedMarkerData
          -> Data.ProtoLens.Encoding.Bytes.Parser PatchedMarkerData
        loop :: PatchedMarkerData -> Parser PatchedMarkerData
loop PatchedMarkerData
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
"id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x)
                        Word64
16
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"deprecated"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"deprecated") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser PatchedMarkerData -> String -> Parser PatchedMarkerData
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PatchedMarkerData -> Parser PatchedMarkerData
loop PatchedMarkerData
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PatchedMarkerData"
  buildMessage :: PatchedMarkerData -> Builder
buildMessage
    = \ PatchedMarkerData
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike Text PatchedMarkerData PatchedMarkerData Text Text
-> PatchedMarkerData -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") PatchedMarkerData
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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 PatchedMarkerData PatchedMarkerData Bool Bool
-> PatchedMarkerData -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"deprecated") PatchedMarkerData
_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 PatchedMarkerData PatchedMarkerData FieldSet FieldSet
-> PatchedMarkerData -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet PatchedMarkerData PatchedMarkerData FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PatchedMarkerData FieldSet
Data.ProtoLens.unknownFields PatchedMarkerData
_x)))
instance Control.DeepSeq.NFData PatchedMarkerData where
  rnf :: PatchedMarkerData -> ()
rnf
    = \ PatchedMarkerData
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PatchedMarkerData -> FieldSet
_PatchedMarkerData'_unknownFields PatchedMarkerData
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PatchedMarkerData -> Text
_PatchedMarkerData'id PatchedMarkerData
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (PatchedMarkerData -> Bool
_PatchedMarkerData'deprecated PatchedMarkerData
x__) ()))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \3temporal/sdk/core/external_data/external_data.proto\DC2\NAKcoresdk.external_data\SUB\RSgoogle/protobuf/duration.proto\SUB\USgoogle/protobuf/timestamp.proto\"\211\STX\n\
    \\ETBLocalActivityMarkerData\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\CAN\n\
    \\aattempt\CAN\STX \SOH(\rR\aattempt\DC2\US\n\
    \\vactivity_id\CAN\ETX \SOH(\tR\n\
    \activityId\DC2#\n\
    \\ractivity_type\CAN\EOT \SOH(\tR\factivityType\DC2?\n\
    \\rcomplete_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\fcompleteTime\DC23\n\
    \\abackoff\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\abackoff\DC2P\n\
    \\SYNoriginal_schedule_time\CAN\a \SOH(\v2\SUB.google.protobuf.TimestampR\DC4originalScheduleTime\"C\n\
    \\DC1PatchedMarkerData\DC2\SO\n\
    \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\RS\n\
    \\n\
    \deprecated\CAN\STX \SOH(\bR\n\
    \deprecatedB(\234\STX%Temporalio::Bridge::Api::ExternalDataJ\231\r\n\
    \\ACK\DC2\EOT\NUL\NUL%\SOH\n\
    \\b\n\
    \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\STX\NUL\RS\n\
    \\b\n\
    \\SOH\b\DC2\ETX\ETX\NUL>\n\
    \\t\n\
    \\STX\b-\DC2\ETX\ETX\NUL>\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\ENQ\NUL(\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\ACK\NUL)\n\
    \\166\STX\n\
    \\STX\EOT\NUL\DC2\EOT\f\NUL\RS\SOH2\153\STX This file defines data that Core might write externally. The first motivating case being\n\
    \ storing data in markers in event history. Defining such data as protos provides an easy way\n\
    \ for consumers which would like to just depend on the proto package to make sense of marker data.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX\f\b\US\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX\r\STX\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\r\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\r\t\f\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\r\SI\DLE\n\
    \\186\SOH\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DLE\STX\NAK\SUB\172\SOH The number of attempts at execution before we recorded this result. Typically starts at 1,\n\
    \ but it is possible to start at a higher number when backing off using a timer.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\DLE\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DLE\t\DLE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DLE\DC3\DC4\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX\DC1\STX\EM\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\DC1\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\DC1\t\DC4\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\DC1\ETB\CAN\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX\DC2\STX\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX\DC2\STX\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\DC2\t\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\DC2\EM\SUB\n\
    \\128\STX\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX\SYN\STX.\SUB\242\SOH You can think of this as \"perceived completion time\". It is the time the local activity thought\n\
    \ it was when it completed. Which could be different from wall-clock time because of workflow\n\
    \ replay. It's the WFT start time + the LA's runtime\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX\SYN\STX\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX\SYN\FS)\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX\SYN,-\n\
    \\240\SOH\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX\SUB\STX'\SUB\226\SOH If set, this local activity conceptually is retrying after the specified backoff.\n\
    \ Implementation wise, they are really two different LA machines, but with the same type & input.\n\
    \ The retry starts with an attempt number > 1.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ACK\DC2\ETX\SUB\STX\SUB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX\SUB\ESC\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX\SUB%&\n\
    \\160\SOH\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETX\GS\STX7\SUB\146\SOH The time the LA was originally scheduled (wall clock time). This is used to track\n\
    \ schedule-to-close timeouts when timer-based backoffs are used\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ACK\DC2\ETX\GS\STX\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX\GS\FS2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX\GS56\n\
    \\n\
    \\n\
    \\STX\EOT\SOH\DC2\EOT \NUL%\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETX \b\EM\n\
    \\ESC\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\ETX\"\STX\DLE\SUB\SO The patch id\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\"\STX\b\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\"\t\v\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\"\SO\SI\n\
    \=\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\ETX$\STX\SYN\SUB0 Whether or not the patch is marked deprecated.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX$\STX\ACK\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX$\a\DC1\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX$\DC4\NAKb\ACKproto3"