{-# 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.Version.V1.Message (
Alert(), ReleaseInfo(), VersionInfo()
) 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.Timestamp
import qualified Proto.Temporal.Api.Enums.V1.Common
data Alert
= Alert'_constructor {Alert -> Text
_Alert'message :: !Data.Text.Text,
Alert -> Severity
_Alert'severity :: !Proto.Temporal.Api.Enums.V1.Common.Severity,
Alert -> FieldSet
_Alert'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (Alert -> Alert -> Bool
(Alert -> Alert -> Bool) -> (Alert -> Alert -> Bool) -> Eq Alert
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Alert -> Alert -> Bool
== :: Alert -> Alert -> Bool
$c/= :: Alert -> Alert -> Bool
/= :: Alert -> Alert -> Bool
Prelude.Eq, Eq Alert
Eq Alert =>
(Alert -> Alert -> Ordering)
-> (Alert -> Alert -> Bool)
-> (Alert -> Alert -> Bool)
-> (Alert -> Alert -> Bool)
-> (Alert -> Alert -> Bool)
-> (Alert -> Alert -> Alert)
-> (Alert -> Alert -> Alert)
-> Ord Alert
Alert -> Alert -> Bool
Alert -> Alert -> Ordering
Alert -> Alert -> Alert
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: Alert -> Alert -> Ordering
compare :: Alert -> Alert -> Ordering
$c< :: Alert -> Alert -> Bool
< :: Alert -> Alert -> Bool
$c<= :: Alert -> Alert -> Bool
<= :: Alert -> Alert -> Bool
$c> :: Alert -> Alert -> Bool
> :: Alert -> Alert -> Bool
$c>= :: Alert -> Alert -> Bool
>= :: Alert -> Alert -> Bool
$cmax :: Alert -> Alert -> Alert
max :: Alert -> Alert -> Alert
$cmin :: Alert -> Alert -> Alert
min :: Alert -> Alert -> Alert
Prelude.Ord)
instance Prelude.Show Alert where
showsPrec :: Int -> Alert -> ShowS
showsPrec Int
_ Alert
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(Alert -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort Alert
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField Alert "message" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "message" -> (Text -> f Text) -> Alert -> f Alert
fieldOf Proxy# "message"
_
= ((Text -> f Text) -> Alert -> f Alert)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> Alert
-> f Alert
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Alert -> Text)
-> (Alert -> Text -> Alert) -> Lens Alert Alert Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Alert -> Text
_Alert'message (\ Alert
x__ Text
y__ -> Alert
x__ {_Alert'message = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField Alert "severity" Proto.Temporal.Api.Enums.V1.Common.Severity where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "severity" -> (Severity -> f Severity) -> Alert -> f Alert
fieldOf Proxy# "severity"
_
= ((Severity -> f Severity) -> Alert -> f Alert)
-> ((Severity -> f Severity) -> Severity -> f Severity)
-> (Severity -> f Severity)
-> Alert
-> f Alert
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Alert -> Severity)
-> (Alert -> Severity -> Alert)
-> Lens Alert Alert Severity Severity
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Alert -> Severity
_Alert'severity (\ Alert
x__ Severity
y__ -> Alert
x__ {_Alert'severity = y__}))
(Severity -> f Severity) -> Severity -> f Severity
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message Alert where
messageName :: Proxy Alert -> Text
messageName Proxy Alert
_ = String -> Text
Data.Text.pack String
"temporal.api.version.v1.Alert"
packedMessageDescriptor :: Proxy Alert -> ByteString
packedMessageDescriptor Proxy Alert
_
= ByteString
"\n\
\\ENQAlert\DC2\CAN\n\
\\amessage\CAN\SOH \SOH(\tR\amessage\DC2;\n\
\\bseverity\CAN\STX \SOH(\SO2\US.temporal.api.enums.v1.SeverityR\bseverity"
packedFileDescriptor :: Proxy Alert -> ByteString
packedFileDescriptor Proxy Alert
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor Alert)
fieldsByTag
= let
message__field_descriptor :: FieldDescriptor Alert
message__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor Alert Text
-> FieldDescriptor Alert
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"message"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens Alert Alert Text Text -> FieldAccessor Alert Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"message")) ::
Data.ProtoLens.FieldDescriptor Alert
severity__field_descriptor :: FieldDescriptor Alert
severity__field_descriptor
= String
-> FieldTypeDescriptor Severity
-> FieldAccessor Alert Severity
-> FieldDescriptor Alert
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"severity"
(ScalarField Severity -> FieldTypeDescriptor Severity
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Severity
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Common.Severity)
(WireDefault Severity
-> Lens Alert Alert Severity Severity
-> FieldAccessor Alert Severity
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Severity
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severity")) ::
Data.ProtoLens.FieldDescriptor Alert
in
[(Tag, FieldDescriptor Alert)] -> Map Tag (FieldDescriptor Alert)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor Alert
message__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor Alert
severity__field_descriptor)]
unknownFields :: Lens' Alert FieldSet
unknownFields
= (Alert -> FieldSet)
-> (Alert -> FieldSet -> Alert) -> Lens' Alert FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Alert -> FieldSet
_Alert'_unknownFields
(\ Alert
x__ FieldSet
y__ -> Alert
x__ {_Alert'_unknownFields = y__})
defMessage :: Alert
defMessage
= Alert'_constructor
{_Alert'message :: Text
_Alert'message = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_Alert'severity :: Severity
_Alert'severity = Severity
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_Alert'_unknownFields :: FieldSet
_Alert'_unknownFields = []}
parseMessage :: Parser Alert
parseMessage
= let
loop :: Alert -> Data.ProtoLens.Encoding.Bytes.Parser Alert
loop :: Alert -> Parser Alert
loop Alert
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"message"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"message") y x)
Word64
16
-> do y <- Parser Severity -> String -> Parser Severity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> Severity) -> Parser Int -> Parser Severity
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> Severity
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
"severity"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"severity") 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 Alert -> String -> Parser Alert
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do Alert -> Parser Alert
loop Alert
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"Alert"
buildMessage :: Alert -> Builder
buildMessage
= \ Alert
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text Alert Alert Text Text -> Alert -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"message") Alert
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
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 :: Severity
_v = FoldLike Severity Alert Alert Severity Severity
-> Alert -> Severity
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"severity") Alert
_x
in
if Severity -> Severity -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Severity
_v Severity
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
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) -> (Severity -> Int) -> Severity -> 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)
Severity -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Severity
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet Alert Alert FieldSet FieldSet
-> Alert -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet Alert Alert FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' Alert FieldSet
Data.ProtoLens.unknownFields Alert
_x)))
instance Control.DeepSeq.NFData Alert where
rnf :: Alert -> ()
rnf
= \ Alert
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(Alert -> FieldSet
_Alert'_unknownFields Alert
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(Alert -> Text
_Alert'message Alert
x__)
(Severity -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (Alert -> Severity
_Alert'severity Alert
x__) ()))
data ReleaseInfo
= ReleaseInfo'_constructor {ReleaseInfo -> Text
_ReleaseInfo'version :: !Data.Text.Text,
ReleaseInfo -> Maybe Timestamp
_ReleaseInfo'releaseTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
ReleaseInfo -> Text
_ReleaseInfo'notes :: !Data.Text.Text,
ReleaseInfo -> FieldSet
_ReleaseInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (ReleaseInfo -> ReleaseInfo -> Bool
(ReleaseInfo -> ReleaseInfo -> Bool)
-> (ReleaseInfo -> ReleaseInfo -> Bool) -> Eq ReleaseInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ReleaseInfo -> ReleaseInfo -> Bool
== :: ReleaseInfo -> ReleaseInfo -> Bool
$c/= :: ReleaseInfo -> ReleaseInfo -> Bool
/= :: ReleaseInfo -> ReleaseInfo -> Bool
Prelude.Eq, Eq ReleaseInfo
Eq ReleaseInfo =>
(ReleaseInfo -> ReleaseInfo -> Ordering)
-> (ReleaseInfo -> ReleaseInfo -> Bool)
-> (ReleaseInfo -> ReleaseInfo -> Bool)
-> (ReleaseInfo -> ReleaseInfo -> Bool)
-> (ReleaseInfo -> ReleaseInfo -> Bool)
-> (ReleaseInfo -> ReleaseInfo -> ReleaseInfo)
-> (ReleaseInfo -> ReleaseInfo -> ReleaseInfo)
-> Ord ReleaseInfo
ReleaseInfo -> ReleaseInfo -> Bool
ReleaseInfo -> ReleaseInfo -> Ordering
ReleaseInfo -> ReleaseInfo -> ReleaseInfo
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: ReleaseInfo -> ReleaseInfo -> Ordering
compare :: ReleaseInfo -> ReleaseInfo -> Ordering
$c< :: ReleaseInfo -> ReleaseInfo -> Bool
< :: ReleaseInfo -> ReleaseInfo -> Bool
$c<= :: ReleaseInfo -> ReleaseInfo -> Bool
<= :: ReleaseInfo -> ReleaseInfo -> Bool
$c> :: ReleaseInfo -> ReleaseInfo -> Bool
> :: ReleaseInfo -> ReleaseInfo -> Bool
$c>= :: ReleaseInfo -> ReleaseInfo -> Bool
>= :: ReleaseInfo -> ReleaseInfo -> Bool
$cmax :: ReleaseInfo -> ReleaseInfo -> ReleaseInfo
max :: ReleaseInfo -> ReleaseInfo -> ReleaseInfo
$cmin :: ReleaseInfo -> ReleaseInfo -> ReleaseInfo
min :: ReleaseInfo -> ReleaseInfo -> ReleaseInfo
Prelude.Ord)
instance Prelude.Show ReleaseInfo where
showsPrec :: Int -> ReleaseInfo -> ShowS
showsPrec Int
_ ReleaseInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(ReleaseInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ReleaseInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ReleaseInfo "version" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "version"
-> (Text -> f Text) -> ReleaseInfo -> f ReleaseInfo
fieldOf Proxy# "version"
_
= ((Text -> f Text) -> ReleaseInfo -> f ReleaseInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ReleaseInfo
-> f ReleaseInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ReleaseInfo -> Text)
-> (ReleaseInfo -> Text -> ReleaseInfo)
-> Lens ReleaseInfo ReleaseInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ReleaseInfo -> Text
_ReleaseInfo'version
(\ ReleaseInfo
x__ Text
y__ -> ReleaseInfo
x__ {_ReleaseInfo'version = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ReleaseInfo "releaseTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "releaseTime"
-> (Timestamp -> f Timestamp) -> ReleaseInfo -> f ReleaseInfo
fieldOf Proxy# "releaseTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> ReleaseInfo -> f ReleaseInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> ReleaseInfo
-> f ReleaseInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ReleaseInfo -> Maybe Timestamp)
-> (ReleaseInfo -> Maybe Timestamp -> ReleaseInfo)
-> Lens ReleaseInfo ReleaseInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ReleaseInfo -> Maybe Timestamp
_ReleaseInfo'releaseTime
(\ ReleaseInfo
x__ Maybe Timestamp
y__ -> ReleaseInfo
x__ {_ReleaseInfo'releaseTime = 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 ReleaseInfo "maybe'releaseTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'releaseTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ReleaseInfo
-> f ReleaseInfo
fieldOf Proxy# "maybe'releaseTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> ReleaseInfo -> f ReleaseInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ReleaseInfo
-> f ReleaseInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ReleaseInfo -> Maybe Timestamp)
-> (ReleaseInfo -> Maybe Timestamp -> ReleaseInfo)
-> Lens ReleaseInfo ReleaseInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ReleaseInfo -> Maybe Timestamp
_ReleaseInfo'releaseTime
(\ ReleaseInfo
x__ Maybe Timestamp
y__ -> ReleaseInfo
x__ {_ReleaseInfo'releaseTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ReleaseInfo "notes" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "notes" -> (Text -> f Text) -> ReleaseInfo -> f ReleaseInfo
fieldOf Proxy# "notes"
_
= ((Text -> f Text) -> ReleaseInfo -> f ReleaseInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ReleaseInfo
-> f ReleaseInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ReleaseInfo -> Text)
-> (ReleaseInfo -> Text -> ReleaseInfo)
-> Lens ReleaseInfo ReleaseInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ReleaseInfo -> Text
_ReleaseInfo'notes (\ ReleaseInfo
x__ Text
y__ -> ReleaseInfo
x__ {_ReleaseInfo'notes = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ReleaseInfo where
messageName :: Proxy ReleaseInfo -> Text
messageName Proxy ReleaseInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.version.v1.ReleaseInfo"
packedMessageDescriptor :: Proxy ReleaseInfo -> ByteString
packedMessageDescriptor Proxy ReleaseInfo
_
= ByteString
"\n\
\\vReleaseInfo\DC2\CAN\n\
\\aversion\CAN\SOH \SOH(\tR\aversion\DC2=\n\
\\frelease_time\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\vreleaseTime\DC2\DC4\n\
\\ENQnotes\CAN\ETX \SOH(\tR\ENQnotes"
packedFileDescriptor :: Proxy ReleaseInfo -> ByteString
packedFileDescriptor Proxy ReleaseInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor ReleaseInfo)
fieldsByTag
= let
version__field_descriptor :: FieldDescriptor ReleaseInfo
version__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ReleaseInfo Text
-> FieldDescriptor ReleaseInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"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 ReleaseInfo ReleaseInfo Text Text
-> FieldAccessor ReleaseInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"version")) ::
Data.ProtoLens.FieldDescriptor ReleaseInfo
releaseTime__field_descriptor :: FieldDescriptor ReleaseInfo
releaseTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ReleaseInfo Timestamp
-> FieldDescriptor ReleaseInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"release_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 ReleaseInfo ReleaseInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor ReleaseInfo 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'releaseTime")) ::
Data.ProtoLens.FieldDescriptor ReleaseInfo
notes__field_descriptor :: FieldDescriptor ReleaseInfo
notes__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ReleaseInfo Text
-> FieldDescriptor ReleaseInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"notes"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens ReleaseInfo ReleaseInfo Text Text
-> FieldAccessor ReleaseInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"notes")) ::
Data.ProtoLens.FieldDescriptor ReleaseInfo
in
[(Tag, FieldDescriptor ReleaseInfo)]
-> Map Tag (FieldDescriptor ReleaseInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ReleaseInfo
version__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ReleaseInfo
releaseTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ReleaseInfo
notes__field_descriptor)]
unknownFields :: Lens' ReleaseInfo FieldSet
unknownFields
= (ReleaseInfo -> FieldSet)
-> (ReleaseInfo -> FieldSet -> ReleaseInfo)
-> Lens' ReleaseInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ReleaseInfo -> FieldSet
_ReleaseInfo'_unknownFields
(\ ReleaseInfo
x__ FieldSet
y__ -> ReleaseInfo
x__ {_ReleaseInfo'_unknownFields = y__})
defMessage :: ReleaseInfo
defMessage
= ReleaseInfo'_constructor
{_ReleaseInfo'version :: Text
_ReleaseInfo'version = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ReleaseInfo'releaseTime :: Maybe Timestamp
_ReleaseInfo'releaseTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_ReleaseInfo'notes :: Text
_ReleaseInfo'notes = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ReleaseInfo'_unknownFields :: FieldSet
_ReleaseInfo'_unknownFields = []}
parseMessage :: Parser ReleaseInfo
parseMessage
= let
loop ::
ReleaseInfo -> Data.ProtoLens.Encoding.Bytes.Parser ReleaseInfo
loop :: ReleaseInfo -> Parser ReleaseInfo
loop ReleaseInfo
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
"version"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"version") y x)
Word64
18
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"release_time"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"releaseTime") 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
"notes"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"notes") 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 ReleaseInfo -> String -> Parser ReleaseInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ReleaseInfo -> Parser ReleaseInfo
loop ReleaseInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ReleaseInfo"
buildMessage :: ReleaseInfo -> Builder
buildMessage
= \ ReleaseInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text ReleaseInfo ReleaseInfo Text Text
-> ReleaseInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"version") ReleaseInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
ReleaseInfo
ReleaseInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> ReleaseInfo -> 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'releaseTime") ReleaseInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text ReleaseInfo ReleaseInfo Text Text
-> ReleaseInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"notes") ReleaseInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
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 ReleaseInfo ReleaseInfo FieldSet FieldSet
-> ReleaseInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ReleaseInfo ReleaseInfo FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ReleaseInfo FieldSet
Data.ProtoLens.unknownFields ReleaseInfo
_x))))
instance Control.DeepSeq.NFData ReleaseInfo where
rnf :: ReleaseInfo -> ()
rnf
= \ ReleaseInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ReleaseInfo -> FieldSet
_ReleaseInfo'_unknownFields ReleaseInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ReleaseInfo -> Text
_ReleaseInfo'version ReleaseInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ReleaseInfo -> Maybe Timestamp
_ReleaseInfo'releaseTime ReleaseInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ReleaseInfo -> Text
_ReleaseInfo'notes ReleaseInfo
x__) ())))
data VersionInfo
= VersionInfo'_constructor {VersionInfo -> Maybe ReleaseInfo
_VersionInfo'current :: !(Prelude.Maybe ReleaseInfo),
VersionInfo -> Maybe ReleaseInfo
_VersionInfo'recommended :: !(Prelude.Maybe ReleaseInfo),
VersionInfo -> Text
_VersionInfo'instructions :: !Data.Text.Text,
VersionInfo -> Vector Alert
_VersionInfo'alerts :: !(Data.Vector.Vector Alert),
VersionInfo -> Maybe Timestamp
_VersionInfo'lastUpdateTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
VersionInfo -> FieldSet
_VersionInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (VersionInfo -> VersionInfo -> Bool
(VersionInfo -> VersionInfo -> Bool)
-> (VersionInfo -> VersionInfo -> Bool) -> Eq VersionInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VersionInfo -> VersionInfo -> Bool
== :: VersionInfo -> VersionInfo -> Bool
$c/= :: VersionInfo -> VersionInfo -> Bool
/= :: VersionInfo -> VersionInfo -> Bool
Prelude.Eq, Eq VersionInfo
Eq VersionInfo =>
(VersionInfo -> VersionInfo -> Ordering)
-> (VersionInfo -> VersionInfo -> Bool)
-> (VersionInfo -> VersionInfo -> Bool)
-> (VersionInfo -> VersionInfo -> Bool)
-> (VersionInfo -> VersionInfo -> Bool)
-> (VersionInfo -> VersionInfo -> VersionInfo)
-> (VersionInfo -> VersionInfo -> VersionInfo)
-> Ord VersionInfo
VersionInfo -> VersionInfo -> Bool
VersionInfo -> VersionInfo -> Ordering
VersionInfo -> VersionInfo -> VersionInfo
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: VersionInfo -> VersionInfo -> Ordering
compare :: VersionInfo -> VersionInfo -> Ordering
$c< :: VersionInfo -> VersionInfo -> Bool
< :: VersionInfo -> VersionInfo -> Bool
$c<= :: VersionInfo -> VersionInfo -> Bool
<= :: VersionInfo -> VersionInfo -> Bool
$c> :: VersionInfo -> VersionInfo -> Bool
> :: VersionInfo -> VersionInfo -> Bool
$c>= :: VersionInfo -> VersionInfo -> Bool
>= :: VersionInfo -> VersionInfo -> Bool
$cmax :: VersionInfo -> VersionInfo -> VersionInfo
max :: VersionInfo -> VersionInfo -> VersionInfo
$cmin :: VersionInfo -> VersionInfo -> VersionInfo
min :: VersionInfo -> VersionInfo -> VersionInfo
Prelude.Ord)
instance Prelude.Show VersionInfo where
showsPrec :: Int -> VersionInfo -> ShowS
showsPrec Int
_ VersionInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(VersionInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort VersionInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField VersionInfo "current" ReleaseInfo where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "current"
-> (ReleaseInfo -> f ReleaseInfo) -> VersionInfo -> f VersionInfo
fieldOf Proxy# "current"
_
= ((Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo -> f VersionInfo)
-> ((ReleaseInfo -> f ReleaseInfo)
-> Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> (ReleaseInfo -> f ReleaseInfo)
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Maybe ReleaseInfo)
-> (VersionInfo -> Maybe ReleaseInfo -> VersionInfo)
-> Lens
VersionInfo VersionInfo (Maybe ReleaseInfo) (Maybe ReleaseInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Maybe ReleaseInfo
_VersionInfo'current
(\ VersionInfo
x__ Maybe ReleaseInfo
y__ -> VersionInfo
x__ {_VersionInfo'current = y__}))
(ReleaseInfo -> Lens' (Maybe ReleaseInfo) ReleaseInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ReleaseInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField VersionInfo "maybe'current" (Prelude.Maybe ReleaseInfo) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'current"
-> (Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo
-> f VersionInfo
fieldOf Proxy# "maybe'current"
_
= ((Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo -> f VersionInfo)
-> ((Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> (Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Maybe ReleaseInfo)
-> (VersionInfo -> Maybe ReleaseInfo -> VersionInfo)
-> Lens
VersionInfo VersionInfo (Maybe ReleaseInfo) (Maybe ReleaseInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Maybe ReleaseInfo
_VersionInfo'current
(\ VersionInfo
x__ Maybe ReleaseInfo
y__ -> VersionInfo
x__ {_VersionInfo'current = y__}))
(Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> Maybe ReleaseInfo -> f (Maybe ReleaseInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VersionInfo "recommended" ReleaseInfo where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "recommended"
-> (ReleaseInfo -> f ReleaseInfo) -> VersionInfo -> f VersionInfo
fieldOf Proxy# "recommended"
_
= ((Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo -> f VersionInfo)
-> ((ReleaseInfo -> f ReleaseInfo)
-> Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> (ReleaseInfo -> f ReleaseInfo)
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Maybe ReleaseInfo)
-> (VersionInfo -> Maybe ReleaseInfo -> VersionInfo)
-> Lens
VersionInfo VersionInfo (Maybe ReleaseInfo) (Maybe ReleaseInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Maybe ReleaseInfo
_VersionInfo'recommended
(\ VersionInfo
x__ Maybe ReleaseInfo
y__ -> VersionInfo
x__ {_VersionInfo'recommended = y__}))
(ReleaseInfo -> Lens' (Maybe ReleaseInfo) ReleaseInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ReleaseInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField VersionInfo "maybe'recommended" (Prelude.Maybe ReleaseInfo) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'recommended"
-> (Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo
-> f VersionInfo
fieldOf Proxy# "maybe'recommended"
_
= ((Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo -> f VersionInfo)
-> ((Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> (Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Maybe ReleaseInfo)
-> (VersionInfo -> Maybe ReleaseInfo -> VersionInfo)
-> Lens
VersionInfo VersionInfo (Maybe ReleaseInfo) (Maybe ReleaseInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Maybe ReleaseInfo
_VersionInfo'recommended
(\ VersionInfo
x__ Maybe ReleaseInfo
y__ -> VersionInfo
x__ {_VersionInfo'recommended = y__}))
(Maybe ReleaseInfo -> f (Maybe ReleaseInfo))
-> Maybe ReleaseInfo -> f (Maybe ReleaseInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VersionInfo "instructions" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "instructions"
-> (Text -> f Text) -> VersionInfo -> f VersionInfo
fieldOf Proxy# "instructions"
_
= ((Text -> f Text) -> VersionInfo -> f VersionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Text)
-> (VersionInfo -> Text -> VersionInfo)
-> Lens VersionInfo VersionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Text
_VersionInfo'instructions
(\ VersionInfo
x__ Text
y__ -> VersionInfo
x__ {_VersionInfo'instructions = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VersionInfo "alerts" [Alert] where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "alerts"
-> ([Alert] -> f [Alert]) -> VersionInfo -> f VersionInfo
fieldOf Proxy# "alerts"
_
= ((Vector Alert -> f (Vector Alert))
-> VersionInfo -> f VersionInfo)
-> (([Alert] -> f [Alert]) -> Vector Alert -> f (Vector Alert))
-> ([Alert] -> f [Alert])
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Vector Alert)
-> (VersionInfo -> Vector Alert -> VersionInfo)
-> Lens VersionInfo VersionInfo (Vector Alert) (Vector Alert)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Vector Alert
_VersionInfo'alerts (\ VersionInfo
x__ Vector Alert
y__ -> VersionInfo
x__ {_VersionInfo'alerts = y__}))
((Vector Alert -> [Alert])
-> (Vector Alert -> [Alert] -> Vector Alert)
-> Lens (Vector Alert) (Vector Alert) [Alert] [Alert]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Vector Alert -> [Alert]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
(\ Vector Alert
_ [Alert]
y__ -> [Alert] -> Vector Alert
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Alert]
y__))
instance Data.ProtoLens.Field.HasField VersionInfo "vec'alerts" (Data.Vector.Vector Alert) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'alerts"
-> (Vector Alert -> f (Vector Alert))
-> VersionInfo
-> f VersionInfo
fieldOf Proxy# "vec'alerts"
_
= ((Vector Alert -> f (Vector Alert))
-> VersionInfo -> f VersionInfo)
-> ((Vector Alert -> f (Vector Alert))
-> Vector Alert -> f (Vector Alert))
-> (Vector Alert -> f (Vector Alert))
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Vector Alert)
-> (VersionInfo -> Vector Alert -> VersionInfo)
-> Lens VersionInfo VersionInfo (Vector Alert) (Vector Alert)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Vector Alert
_VersionInfo'alerts (\ VersionInfo
x__ Vector Alert
y__ -> VersionInfo
x__ {_VersionInfo'alerts = y__}))
(Vector Alert -> f (Vector Alert))
-> Vector Alert -> f (Vector Alert)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField VersionInfo "lastUpdateTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastUpdateTime"
-> (Timestamp -> f Timestamp) -> VersionInfo -> f VersionInfo
fieldOf Proxy# "lastUpdateTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> VersionInfo -> f VersionInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Maybe Timestamp)
-> (VersionInfo -> Maybe Timestamp -> VersionInfo)
-> Lens VersionInfo VersionInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Maybe Timestamp
_VersionInfo'lastUpdateTime
(\ VersionInfo
x__ Maybe Timestamp
y__ -> VersionInfo
x__ {_VersionInfo'lastUpdateTime = 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 VersionInfo "maybe'lastUpdateTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastUpdateTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> VersionInfo
-> f VersionInfo
fieldOf Proxy# "maybe'lastUpdateTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> VersionInfo -> f VersionInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> VersionInfo
-> f VersionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((VersionInfo -> Maybe Timestamp)
-> (VersionInfo -> Maybe Timestamp -> VersionInfo)
-> Lens VersionInfo VersionInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> Maybe Timestamp
_VersionInfo'lastUpdateTime
(\ VersionInfo
x__ Maybe Timestamp
y__ -> VersionInfo
x__ {_VersionInfo'lastUpdateTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message VersionInfo where
messageName :: Proxy VersionInfo -> Text
messageName Proxy VersionInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.version.v1.VersionInfo"
packedMessageDescriptor :: Proxy VersionInfo -> ByteString
packedMessageDescriptor Proxy VersionInfo
_
= ByteString
"\n\
\\vVersionInfo\DC2>\n\
\\acurrent\CAN\SOH \SOH(\v2$.temporal.api.version.v1.ReleaseInfoR\acurrent\DC2F\n\
\\vrecommended\CAN\STX \SOH(\v2$.temporal.api.version.v1.ReleaseInfoR\vrecommended\DC2\"\n\
\\finstructions\CAN\ETX \SOH(\tR\finstructions\DC26\n\
\\ACKalerts\CAN\EOT \ETX(\v2\RS.temporal.api.version.v1.AlertR\ACKalerts\DC2D\n\
\\DLElast_update_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\SOlastUpdateTime"
packedFileDescriptor :: Proxy VersionInfo -> ByteString
packedFileDescriptor Proxy VersionInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor VersionInfo)
fieldsByTag
= let
current__field_descriptor :: FieldDescriptor VersionInfo
current__field_descriptor
= String
-> FieldTypeDescriptor ReleaseInfo
-> FieldAccessor VersionInfo ReleaseInfo
-> FieldDescriptor VersionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"current"
(MessageOrGroup -> FieldTypeDescriptor ReleaseInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ReleaseInfo)
(Lens
VersionInfo VersionInfo (Maybe ReleaseInfo) (Maybe ReleaseInfo)
-> FieldAccessor VersionInfo ReleaseInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'current")) ::
Data.ProtoLens.FieldDescriptor VersionInfo
recommended__field_descriptor :: FieldDescriptor VersionInfo
recommended__field_descriptor
= String
-> FieldTypeDescriptor ReleaseInfo
-> FieldAccessor VersionInfo ReleaseInfo
-> FieldDescriptor VersionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"recommended"
(MessageOrGroup -> FieldTypeDescriptor ReleaseInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ReleaseInfo)
(Lens
VersionInfo VersionInfo (Maybe ReleaseInfo) (Maybe ReleaseInfo)
-> FieldAccessor VersionInfo ReleaseInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'recommended")) ::
Data.ProtoLens.FieldDescriptor VersionInfo
instructions__field_descriptor :: FieldDescriptor VersionInfo
instructions__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor VersionInfo Text
-> FieldDescriptor VersionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"instructions"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens VersionInfo VersionInfo Text Text
-> FieldAccessor VersionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"instructions")) ::
Data.ProtoLens.FieldDescriptor VersionInfo
alerts__field_descriptor :: FieldDescriptor VersionInfo
alerts__field_descriptor
= String
-> FieldTypeDescriptor Alert
-> FieldAccessor VersionInfo Alert
-> FieldDescriptor VersionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"alerts"
(MessageOrGroup -> FieldTypeDescriptor Alert
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Alert)
(Packing
-> Lens' VersionInfo [Alert] -> FieldAccessor VersionInfo Alert
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 @"alerts")) ::
Data.ProtoLens.FieldDescriptor VersionInfo
lastUpdateTime__field_descriptor :: FieldDescriptor VersionInfo
lastUpdateTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor VersionInfo Timestamp
-> FieldDescriptor VersionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_update_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 VersionInfo VersionInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor VersionInfo 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'lastUpdateTime")) ::
Data.ProtoLens.FieldDescriptor VersionInfo
in
[(Tag, FieldDescriptor VersionInfo)]
-> Map Tag (FieldDescriptor VersionInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor VersionInfo
current__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor VersionInfo
recommended__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor VersionInfo
instructions__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor VersionInfo
alerts__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor VersionInfo
lastUpdateTime__field_descriptor)]
unknownFields :: Lens' VersionInfo FieldSet
unknownFields
= (VersionInfo -> FieldSet)
-> (VersionInfo -> FieldSet -> VersionInfo)
-> Lens' VersionInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
VersionInfo -> FieldSet
_VersionInfo'_unknownFields
(\ VersionInfo
x__ FieldSet
y__ -> VersionInfo
x__ {_VersionInfo'_unknownFields = y__})
defMessage :: VersionInfo
defMessage
= VersionInfo'_constructor
{_VersionInfo'current :: Maybe ReleaseInfo
_VersionInfo'current = Maybe ReleaseInfo
forall a. Maybe a
Prelude.Nothing,
_VersionInfo'recommended :: Maybe ReleaseInfo
_VersionInfo'recommended = Maybe ReleaseInfo
forall a. Maybe a
Prelude.Nothing,
_VersionInfo'instructions :: Text
_VersionInfo'instructions = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_VersionInfo'alerts :: Vector Alert
_VersionInfo'alerts = Vector Alert
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_VersionInfo'lastUpdateTime :: Maybe Timestamp
_VersionInfo'lastUpdateTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_VersionInfo'_unknownFields :: FieldSet
_VersionInfo'_unknownFields = []}
parseMessage :: Parser VersionInfo
parseMessage
= let
loop ::
VersionInfo
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Alert
-> Data.ProtoLens.Encoding.Bytes.Parser VersionInfo
loop :: VersionInfo -> Growing Vector RealWorld Alert -> Parser VersionInfo
loop VersionInfo
x Growing Vector RealWorld Alert
mutable'alerts
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do frozen'alerts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Data.ProtoLens.Encoding.Growing.unsafeFreeze
mutable'alerts)
(let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.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'alerts") frozen'alerts x))
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser ReleaseInfo -> String -> Parser ReleaseInfo
forall a. Parser a -> String -> Parser a
(Data.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"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"current") y x)
mutable'alerts
Word64
18
-> do y <- Parser ReleaseInfo -> String -> Parser ReleaseInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"recommended"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"recommended") y x)
mutable'alerts
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
"instructions"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"instructions") y x)
mutable'alerts
Word64
34
-> do !y <- Parser Alert -> String -> Parser Alert
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len)
Data.ProtoLens.parseMessage)
String
"alerts"
v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Data.ProtoLens.Encoding.Growing.append mutable'alerts y)
loop x v
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
"last_update_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastUpdateTime") y x)
mutable'alerts
Word64
wire
-> do !y <- 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'alerts
in
Parser VersionInfo -> String -> Parser VersionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do mutable'alerts <- IO (Growing Vector RealWorld Alert)
-> Parser (Growing Vector RealWorld Alert)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
IO (Growing Vector RealWorld Alert)
IO (Growing Vector (PrimState IO) Alert)
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'alerts)
String
"VersionInfo"
buildMessage :: VersionInfo -> Builder
buildMessage
= \ VersionInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe ReleaseInfo)
VersionInfo
VersionInfo
(Maybe ReleaseInfo)
(Maybe ReleaseInfo)
-> VersionInfo -> Maybe ReleaseInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'current") VersionInfo
_x
of
Maybe ReleaseInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just ReleaseInfo
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (ReleaseInfo -> ByteString) -> ReleaseInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
ReleaseInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ReleaseInfo
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe ReleaseInfo)
VersionInfo
VersionInfo
(Maybe ReleaseInfo)
(Maybe ReleaseInfo)
-> VersionInfo -> Maybe ReleaseInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'recommended") VersionInfo
_x
of
Maybe ReleaseInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just ReleaseInfo
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (ReleaseInfo -> ByteString) -> ReleaseInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
ReleaseInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ReleaseInfo
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text VersionInfo VersionInfo Text Text
-> VersionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"instructions") VersionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
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.<>)
((Alert -> Builder) -> Vector Alert -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ Alert
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Alert -> ByteString) -> Alert -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Alert -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Alert
_v))
(FoldLike
(Vector Alert)
VersionInfo
VersionInfo
(Vector Alert)
(Vector Alert)
-> VersionInfo -> Vector Alert
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'alerts") VersionInfo
_x))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
VersionInfo
VersionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> VersionInfo -> 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'lastUpdateTime") VersionInfo
_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))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet VersionInfo VersionInfo FieldSet FieldSet
-> VersionInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet VersionInfo VersionInfo FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' VersionInfo FieldSet
Data.ProtoLens.unknownFields VersionInfo
_x))))))
instance Control.DeepSeq.NFData VersionInfo where
rnf :: VersionInfo -> ()
rnf
= \ VersionInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VersionInfo -> FieldSet
_VersionInfo'_unknownFields VersionInfo
x__)
(Maybe ReleaseInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VersionInfo -> Maybe ReleaseInfo
_VersionInfo'current VersionInfo
x__)
(Maybe ReleaseInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VersionInfo -> Maybe ReleaseInfo
_VersionInfo'recommended VersionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VersionInfo -> Text
_VersionInfo'instructions VersionInfo
x__)
(Vector Alert -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(VersionInfo -> Vector Alert
_VersionInfo'alerts VersionInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (VersionInfo -> Maybe Timestamp
_VersionInfo'lastUpdateTime VersionInfo
x__) ())))))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
= ByteString
"\n\
\%temporal/api/version/v1/message.proto\DC2\ETBtemporal.api.version.v1\SUB\USgoogle/protobuf/timestamp.proto\SUB\"temporal/api/enums/v1/common.proto\"|\n\
\\vReleaseInfo\DC2\CAN\n\
\\aversion\CAN\SOH \SOH(\tR\aversion\DC2=\n\
\\frelease_time\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\vreleaseTime\DC2\DC4\n\
\\ENQnotes\CAN\ETX \SOH(\tR\ENQnotes\"^\n\
\\ENQAlert\DC2\CAN\n\
\\amessage\CAN\SOH \SOH(\tR\amessage\DC2;\n\
\\bseverity\CAN\STX \SOH(\SO2\US.temporal.api.enums.v1.SeverityR\bseverity\"\183\STX\n\
\\vVersionInfo\DC2>\n\
\\acurrent\CAN\SOH \SOH(\v2$.temporal.api.version.v1.ReleaseInfoR\acurrent\DC2F\n\
\\vrecommended\CAN\STX \SOH(\v2$.temporal.api.version.v1.ReleaseInfoR\vrecommended\DC2\"\n\
\\finstructions\CAN\ETX \SOH(\tR\finstructions\DC26\n\
\\ACKalerts\CAN\EOT \ETX(\v2\RS.temporal.api.version.v1.AlertR\ACKalerts\DC2D\n\
\\DLElast_update_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\SOlastUpdateTimeB\142\SOH\n\
\\SUBio.temporal.api.version.v1B\fMessageProtoP\SOHZ%go.temporal.io/api/version/v1;version\170\STX\EMTemporalio.Api.Version.V1\234\STX\FSTemporalio::Api::Version::V1J\135\DC1\n\
\\ACK\DC2\EOT\SYN\NUL8\SOH\n\
\\241\b\n\
\\SOH\f\DC2\ETX\SYN\NUL\DC22\230\b The MIT License\n\
\\n\
\ Copyright (c) 2020 Temporal Technologies Inc. All rights reserved.\n\
\\n\
\ Permission is hereby granted, free of charge, to any person obtaining a copy\n\
\ of this software and associated documentation files (the \"Software\"), to deal\n\
\ in the Software without restriction, including without limitation the rights\n\
\ to use, copy, modify, merge, publish, distribute, sublicense, and/or sell\n\
\ copies of the Software, and to permit persons to whom the Software is\n\
\ furnished to do so, subject to the following conditions:\n\
\\n\
\ The above copyright notice and this permission notice shall be included in\n\
\ all copies or substantial portions of the Software.\n\
\\n\
\ THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\n\
\ IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\n\
\ FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE\n\
\ AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER\n\
\ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,\n\
\ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN\n\
\ THE SOFTWARE.\n\
\\n\
\\b\n\
\\SOH\STX\DC2\ETX\CAN\NUL \n\
\\b\n\
\\SOH\b\DC2\ETX\SUB\NUL<\n\
\\t\n\
\\STX\b\v\DC2\ETX\SUB\NUL<\n\
\\b\n\
\\SOH\b\DC2\ETX\ESC\NUL3\n\
\\t\n\
\\STX\b\SOH\DC2\ETX\ESC\NUL3\n\
\\b\n\
\\SOH\b\DC2\ETX\FS\NUL\"\n\
\\t\n\
\\STX\b\n\
\\DC2\ETX\FS\NUL\"\n\
\\b\n\
\\SOH\b\DC2\ETX\GS\NUL-\n\
\\t\n\
\\STX\b\b\DC2\ETX\GS\NUL-\n\
\\b\n\
\\SOH\b\DC2\ETX\RS\NUL5\n\
\\t\n\
\\STX\b-\DC2\ETX\RS\NUL5\n\
\\b\n\
\\SOH\b\DC2\ETX\US\NUL6\n\
\\t\n\
\\STX\b%\DC2\ETX\US\NUL6\n\
\\t\n\
\\STX\ETX\NUL\DC2\ETX!\NUL)\n\
\\t\n\
\\STX\ETX\SOH\DC2\ETX\"\NUL,\n\
\R\n\
\\STX\EOT\NUL\DC2\EOT%\NUL)\SOH\SUBF ReleaseInfo contains information about specific version of temporal.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\NUL\SOH\DC2\ETX%\b\DC3\n\
\\v\n\
\\EOT\EOT\NUL\STX\NUL\DC2\ETX&\EOT\ETB\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\DC2\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX&\NAK\SYN\n\
\\v\n\
\\EOT\EOT\NUL\STX\SOH\DC2\ETX'\EOT/\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX'\EOT\GS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX'\RS*\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX'-.\n\
\\v\n\
\\EOT\EOT\NUL\STX\STX\DC2\ETX(\EOT\NAK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX(\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX(\v\DLE\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX(\DC3\DC4\n\
\7\n\
\\STX\EOT\SOH\DC2\EOT,\NUL/\SOH\SUB+ Alert contains notification and severity.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\SOH\SOH\DC2\ETX,\b\r\n\
\\v\n\
\\EOT\EOT\SOH\STX\NUL\DC2\ETX-\EOT\ETB\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX-\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX-\v\DC2\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX-\NAK\SYN\n\
\\v\n\
\\EOT\EOT\SOH\STX\SOH\DC2\ETX.\EOT0\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETX.\EOT\"\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX.#+\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX../\n\
\\133\SOH\n\
\\STX\EOT\STX\DC2\EOT2\NUL8\SOH\SUBy VersionInfo contains details about current and recommended release versions as well as alerts and upgrade instructions.\n\
\\n\
\\n\
\\n\
\\ETX\EOT\STX\SOH\DC2\ETX2\b\DC3\n\
\\v\n\
\\EOT\EOT\STX\STX\NUL\DC2\ETX3\EOT\FS\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ACK\DC2\ETX3\EOT\SI\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX3\DLE\ETB\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX3\SUB\ESC\n\
\\v\n\
\\EOT\EOT\STX\STX\SOH\DC2\ETX4\EOT \n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ACK\DC2\ETX4\EOT\SI\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX4\DLE\ESC\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX4\RS\US\n\
\\v\n\
\\EOT\EOT\STX\STX\STX\DC2\ETX5\EOT\FS\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETX5\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\SOH\DC2\ETX5\v\ETB\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ETX\DC2\ETX5\SUB\ESC\n\
\\v\n\
\\EOT\EOT\STX\STX\ETX\DC2\ETX6\EOT\RS\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\EOT\DC2\ETX6\EOT\f\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\ACK\DC2\ETX6\r\DC2\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETX6\DC3\EM\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETX6\FS\GS\n\
\\v\n\
\\EOT\EOT\STX\STX\EOT\DC2\ETX7\EOT3\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\ACK\DC2\ETX7\EOT\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETX7\RS.\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETX712b\ACKproto3"