{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies,
UndecidableInstances, GeneralizedNewtypeDeriving,
MultiParamTypeClasses, FlexibleContexts, FlexibleInstances,
PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports#-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports#-}
module Proto.Google.Protobuf.Descriptor
(DescriptorProto(), DescriptorProto'ExtensionRange(),
DescriptorProto'ReservedRange(), EnumDescriptorProto(),
EnumDescriptorProto'EnumReservedRange(), EnumOptions(),
EnumValueDescriptorProto(), EnumValueOptions(),
ExtensionRangeOptions(), FieldDescriptorProto(),
FieldDescriptorProto'Label(..), FieldDescriptorProto'Label(),
FieldDescriptorProto'Type(..), FieldDescriptorProto'Type(),
FieldOptions(), FieldOptions'CType(..), FieldOptions'CType(),
FieldOptions'JSType(..), FieldOptions'JSType(),
FileDescriptorProto(), FileDescriptorSet(), FileOptions(),
FileOptions'OptimizeMode(..), FileOptions'OptimizeMode(),
GeneratedCodeInfo(), GeneratedCodeInfo'Annotation(),
MessageOptions(), MethodDescriptorProto(), MethodOptions(),
MethodOptions'IdempotencyLevel(..),
MethodOptions'IdempotencyLevel(), OneofDescriptorProto(),
OneofOptions(), ServiceDescriptorProto(), ServiceOptions(),
SourceCodeInfo(), SourceCodeInfo'Location(), UninterpretedOption(),
UninterpretedOption'NamePart())
where
import qualified Control.DeepSeq
import qualified Lens.Labels.Prism
import qualified Prelude
import qualified Data.Int
import qualified Data.Word
import qualified Data.ProtoLens
import qualified Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Service.Types
import qualified Lens.Family2
import qualified Lens.Family2.Unchecked
import qualified Data.Text
import qualified Data.Map
import qualified Data.ByteString
import qualified Data.ByteString.Char8
import qualified Lens.Labels
import qualified Text.Read
data DescriptorProto = DescriptorProto{_DescriptorProto'name ::
!(Prelude.Maybe Data.Text.Text),
_DescriptorProto'field :: ![FieldDescriptorProto],
_DescriptorProto'extension :: ![FieldDescriptorProto],
_DescriptorProto'nestedType :: ![DescriptorProto],
_DescriptorProto'enumType :: ![EnumDescriptorProto],
_DescriptorProto'extensionRange ::
![DescriptorProto'ExtensionRange],
_DescriptorProto'oneofDecl :: ![OneofDescriptorProto],
_DescriptorProto'options :: !(Prelude.Maybe MessageOptions),
_DescriptorProto'reservedRange ::
![DescriptorProto'ReservedRange],
_DescriptorProto'reservedName :: ![Data.Text.Text],
_DescriptorProto'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show DescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' DescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'name
(\ x__ y__ -> x__{_DescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' DescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'name
(\ x__ y__ -> x__{_DescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "field"
([FieldDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'field
(\ x__ y__ -> x__{_DescriptorProto'field = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "extension"
([FieldDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'extension
(\ x__ y__ -> x__{_DescriptorProto'extension = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "nestedType"
([DescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'nestedType
(\ x__ y__ -> x__{_DescriptorProto'nestedType = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "enumType"
([EnumDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'enumType
(\ x__ y__ -> x__{_DescriptorProto'enumType = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "extensionRange"
([DescriptorProto'ExtensionRange])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'extensionRange
(\ x__ y__ -> x__{_DescriptorProto'extensionRange = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "oneofDecl"
([OneofDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'oneofDecl
(\ x__ y__ -> x__{_DescriptorProto'oneofDecl = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "options"
(MessageOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'options
(\ x__ y__ -> x__{_DescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' DescriptorProto "maybe'options"
(Prelude.Maybe MessageOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'options
(\ x__ y__ -> x__{_DescriptorProto'options = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "reservedRange"
([DescriptorProto'ReservedRange])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'reservedRange
(\ x__ y__ -> x__{_DescriptorProto'reservedRange = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto "reservedName"
([Data.Text.Text])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'reservedName
(\ x__ y__ -> x__{_DescriptorProto'reservedName = y__}))
Prelude.id
instance Data.ProtoLens.Message DescriptorProto where
messageName _ = Data.Text.pack "google.protobuf.DescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
field__field_descriptor
= Data.ProtoLens.FieldDescriptor "field"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor FieldDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "field")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
extension__field_descriptor
= Data.ProtoLens.FieldDescriptor "extension"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor FieldDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "extension")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
nestedType__field_descriptor
= Data.ProtoLens.FieldDescriptor "nested_type"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor DescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "nestedType")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
enumType__field_descriptor
= Data.ProtoLens.FieldDescriptor "enum_type"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor EnumDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "enumType")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
extensionRange__field_descriptor
= Data.ProtoLens.FieldDescriptor "extension_range"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor DescriptorProto'ExtensionRange)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "extensionRange")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
oneofDecl__field_descriptor
= Data.ProtoLens.FieldDescriptor "oneof_decl"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OneofDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "oneofDecl")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor MessageOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
reservedRange__field_descriptor
= Data.ProtoLens.FieldDescriptor "reserved_range"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor DescriptorProto'ReservedRange)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "reservedRange")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
reservedName__field_descriptor
= Data.ProtoLens.FieldDescriptor "reserved_name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "reservedName")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, field__field_descriptor),
(Data.ProtoLens.Tag 6, extension__field_descriptor),
(Data.ProtoLens.Tag 3, nestedType__field_descriptor),
(Data.ProtoLens.Tag 4, enumType__field_descriptor),
(Data.ProtoLens.Tag 5, extensionRange__field_descriptor),
(Data.ProtoLens.Tag 8, oneofDecl__field_descriptor),
(Data.ProtoLens.Tag 7, options__field_descriptor),
(Data.ProtoLens.Tag 9, reservedRange__field_descriptor),
(Data.ProtoLens.Tag 10, reservedName__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _DescriptorProto'_unknownFields
(\ x__ y__ -> x__{_DescriptorProto'_unknownFields = y__})
defMessage
= DescriptorProto{_DescriptorProto'name = Prelude.Nothing,
_DescriptorProto'field = [], _DescriptorProto'extension = [],
_DescriptorProto'nestedType = [], _DescriptorProto'enumType = [],
_DescriptorProto'extensionRange = [],
_DescriptorProto'oneofDecl = [],
_DescriptorProto'options = Prelude.Nothing,
_DescriptorProto'reservedRange = [],
_DescriptorProto'reservedName = [],
_DescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData DescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_DescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_DescriptorProto'name x__)
(Control.DeepSeq.deepseq (_DescriptorProto'field x__)
(Control.DeepSeq.deepseq (_DescriptorProto'extension x__)
(Control.DeepSeq.deepseq (_DescriptorProto'nestedType x__)
(Control.DeepSeq.deepseq (_DescriptorProto'enumType x__)
(Control.DeepSeq.deepseq (_DescriptorProto'extensionRange x__)
(Control.DeepSeq.deepseq (_DescriptorProto'oneofDecl x__)
(Control.DeepSeq.deepseq (_DescriptorProto'options x__)
(Control.DeepSeq.deepseq
(_DescriptorProto'reservedRange x__)
(Control.DeepSeq.deepseq
(_DescriptorProto'reservedName x__)
(())))))))))))
data DescriptorProto'ExtensionRange = DescriptorProto'ExtensionRange{_DescriptorProto'ExtensionRange'start
::
!(Prelude.Maybe
Data.Int.Int32),
_DescriptorProto'ExtensionRange'end
::
!(Prelude.Maybe
Data.Int.Int32),
_DescriptorProto'ExtensionRange'options
::
!(Prelude.Maybe
ExtensionRangeOptions),
_DescriptorProto'ExtensionRange'_unknownFields
:: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show DescriptorProto'ExtensionRange where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' DescriptorProto'ExtensionRange
"start"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ExtensionRange'start
(\ x__ y__ -> x__{_DescriptorProto'ExtensionRange'start = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' DescriptorProto'ExtensionRange
"maybe'start"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ExtensionRange'start
(\ x__ y__ -> x__{_DescriptorProto'ExtensionRange'start = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto'ExtensionRange "end"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ExtensionRange'end
(\ x__ y__ -> x__{_DescriptorProto'ExtensionRange'end = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' DescriptorProto'ExtensionRange
"maybe'end"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ExtensionRange'end
(\ x__ y__ -> x__{_DescriptorProto'ExtensionRange'end = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto'ExtensionRange
"options"
(ExtensionRangeOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_DescriptorProto'ExtensionRange'options
(\ x__ y__ -> x__{_DescriptorProto'ExtensionRange'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' DescriptorProto'ExtensionRange
"maybe'options"
(Prelude.Maybe ExtensionRangeOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_DescriptorProto'ExtensionRange'options
(\ x__ y__ -> x__{_DescriptorProto'ExtensionRange'options = y__}))
Prelude.id
instance Data.ProtoLens.Message DescriptorProto'ExtensionRange
where
messageName _
= Data.Text.pack "google.protobuf.DescriptorProto.ExtensionRange"
fieldsByTag
= let start__field_descriptor
= Data.ProtoLens.FieldDescriptor "start"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'start")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto'ExtensionRange
end__field_descriptor
= Data.ProtoLens.FieldDescriptor "end"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'end")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto'ExtensionRange
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ExtensionRangeOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto'ExtensionRange
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, start__field_descriptor),
(Data.ProtoLens.Tag 2, end__field_descriptor),
(Data.ProtoLens.Tag 3, options__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_DescriptorProto'ExtensionRange'_unknownFields
(\ x__ y__ ->
x__{_DescriptorProto'ExtensionRange'_unknownFields = y__})
defMessage
= DescriptorProto'ExtensionRange{_DescriptorProto'ExtensionRange'start
= Prelude.Nothing,
_DescriptorProto'ExtensionRange'end = Prelude.Nothing,
_DescriptorProto'ExtensionRange'options =
Prelude.Nothing,
_DescriptorProto'ExtensionRange'_unknownFields = ([])}
instance Control.DeepSeq.NFData DescriptorProto'ExtensionRange
where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_DescriptorProto'ExtensionRange'_unknownFields x__)
(Control.DeepSeq.deepseq
(_DescriptorProto'ExtensionRange'start x__)
(Control.DeepSeq.deepseq (_DescriptorProto'ExtensionRange'end x__)
(Control.DeepSeq.deepseq
(_DescriptorProto'ExtensionRange'options x__)
(()))))
data DescriptorProto'ReservedRange = DescriptorProto'ReservedRange{_DescriptorProto'ReservedRange'start
::
!(Prelude.Maybe Data.Int.Int32),
_DescriptorProto'ReservedRange'end
::
!(Prelude.Maybe Data.Int.Int32),
_DescriptorProto'ReservedRange'_unknownFields
:: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show DescriptorProto'ReservedRange where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' DescriptorProto'ReservedRange "start"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ReservedRange'start
(\ x__ y__ -> x__{_DescriptorProto'ReservedRange'start = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' DescriptorProto'ReservedRange
"maybe'start"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ReservedRange'start
(\ x__ y__ -> x__{_DescriptorProto'ReservedRange'start = y__}))
Prelude.id
instance Lens.Labels.HasLens' DescriptorProto'ReservedRange "end"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ReservedRange'end
(\ x__ y__ -> x__{_DescriptorProto'ReservedRange'end = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' DescriptorProto'ReservedRange
"maybe'end"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _DescriptorProto'ReservedRange'end
(\ x__ y__ -> x__{_DescriptorProto'ReservedRange'end = y__}))
Prelude.id
instance Data.ProtoLens.Message DescriptorProto'ReservedRange where
messageName _
= Data.Text.pack "google.protobuf.DescriptorProto.ReservedRange"
fieldsByTag
= let start__field_descriptor
= Data.ProtoLens.FieldDescriptor "start"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'start")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto'ReservedRange
end__field_descriptor
= Data.ProtoLens.FieldDescriptor "end"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'end")))
:: Data.ProtoLens.FieldDescriptor DescriptorProto'ReservedRange
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, start__field_descriptor),
(Data.ProtoLens.Tag 2, end__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_DescriptorProto'ReservedRange'_unknownFields
(\ x__ y__ ->
x__{_DescriptorProto'ReservedRange'_unknownFields = y__})
defMessage
= DescriptorProto'ReservedRange{_DescriptorProto'ReservedRange'start
= Prelude.Nothing,
_DescriptorProto'ReservedRange'end = Prelude.Nothing,
_DescriptorProto'ReservedRange'_unknownFields = ([])}
instance Control.DeepSeq.NFData DescriptorProto'ReservedRange where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_DescriptorProto'ReservedRange'_unknownFields x__)
(Control.DeepSeq.deepseq (_DescriptorProto'ReservedRange'start x__)
(Control.DeepSeq.deepseq (_DescriptorProto'ReservedRange'end x__)
(())))
data EnumDescriptorProto = EnumDescriptorProto{_EnumDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_EnumDescriptorProto'value ::
![EnumValueDescriptorProto],
_EnumDescriptorProto'options ::
!(Prelude.Maybe EnumOptions),
_EnumDescriptorProto'reservedRange ::
![EnumDescriptorProto'EnumReservedRange],
_EnumDescriptorProto'reservedName ::
![Data.Text.Text],
_EnumDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show EnumDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' EnumDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'name
(\ x__ y__ -> x__{_EnumDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' EnumDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'name
(\ x__ y__ -> x__{_EnumDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumDescriptorProto "value"
([EnumValueDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'value
(\ x__ y__ -> x__{_EnumDescriptorProto'value = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumDescriptorProto "options"
(EnumOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'options
(\ x__ y__ -> x__{_EnumDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' EnumDescriptorProto "maybe'options"
(Prelude.Maybe EnumOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'options
(\ x__ y__ -> x__{_EnumDescriptorProto'options = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumDescriptorProto "reservedRange"
([EnumDescriptorProto'EnumReservedRange])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'reservedRange
(\ x__ y__ -> x__{_EnumDescriptorProto'reservedRange = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumDescriptorProto "reservedName"
([Data.Text.Text])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumDescriptorProto'reservedName
(\ x__ y__ -> x__{_EnumDescriptorProto'reservedName = y__}))
Prelude.id
instance Data.ProtoLens.Message EnumDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.EnumDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor EnumDescriptorProto
value__field_descriptor
= Data.ProtoLens.FieldDescriptor "value"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor EnumValueDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "value")))
:: Data.ProtoLens.FieldDescriptor EnumDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor EnumOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor EnumDescriptorProto
reservedRange__field_descriptor
= Data.ProtoLens.FieldDescriptor "reserved_range"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor
EnumDescriptorProto'EnumReservedRange)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "reservedRange")))
:: Data.ProtoLens.FieldDescriptor EnumDescriptorProto
reservedName__field_descriptor
= Data.ProtoLens.FieldDescriptor "reserved_name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "reservedName")))
:: Data.ProtoLens.FieldDescriptor EnumDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, value__field_descriptor),
(Data.ProtoLens.Tag 3, options__field_descriptor),
(Data.ProtoLens.Tag 4, reservedRange__field_descriptor),
(Data.ProtoLens.Tag 5, reservedName__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _EnumDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_EnumDescriptorProto'_unknownFields = y__})
defMessage
= EnumDescriptorProto{_EnumDescriptorProto'name = Prelude.Nothing,
_EnumDescriptorProto'value = [],
_EnumDescriptorProto'options = Prelude.Nothing,
_EnumDescriptorProto'reservedRange = [],
_EnumDescriptorProto'reservedName = [],
_EnumDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData EnumDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_EnumDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_EnumDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_EnumDescriptorProto'value x__)
(Control.DeepSeq.deepseq (_EnumDescriptorProto'options x__)
(Control.DeepSeq.deepseq (_EnumDescriptorProto'reservedRange x__)
(Control.DeepSeq.deepseq (_EnumDescriptorProto'reservedName x__)
(()))))))
data EnumDescriptorProto'EnumReservedRange = EnumDescriptorProto'EnumReservedRange{_EnumDescriptorProto'EnumReservedRange'start
::
!(Prelude.Maybe
Data.Int.Int32),
_EnumDescriptorProto'EnumReservedRange'end
::
!(Prelude.Maybe
Data.Int.Int32),
_EnumDescriptorProto'EnumReservedRange'_unknownFields
::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show EnumDescriptorProto'EnumReservedRange where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' EnumDescriptorProto'EnumReservedRange
"start"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_EnumDescriptorProto'EnumReservedRange'start
(\ x__ y__ ->
x__{_EnumDescriptorProto'EnumReservedRange'start = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' EnumDescriptorProto'EnumReservedRange
"maybe'start"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_EnumDescriptorProto'EnumReservedRange'start
(\ x__ y__ ->
x__{_EnumDescriptorProto'EnumReservedRange'start = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumDescriptorProto'EnumReservedRange
"end"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_EnumDescriptorProto'EnumReservedRange'end
(\ x__ y__ ->
x__{_EnumDescriptorProto'EnumReservedRange'end = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' EnumDescriptorProto'EnumReservedRange
"maybe'end"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_EnumDescriptorProto'EnumReservedRange'end
(\ x__ y__ ->
x__{_EnumDescriptorProto'EnumReservedRange'end = y__}))
Prelude.id
instance Data.ProtoLens.Message
EnumDescriptorProto'EnumReservedRange
where
messageName _
= Data.Text.pack
"google.protobuf.EnumDescriptorProto.EnumReservedRange"
fieldsByTag
= let start__field_descriptor
= Data.ProtoLens.FieldDescriptor "start"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'start")))
::
Data.ProtoLens.FieldDescriptor
EnumDescriptorProto'EnumReservedRange
end__field_descriptor
= Data.ProtoLens.FieldDescriptor "end"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'end")))
::
Data.ProtoLens.FieldDescriptor
EnumDescriptorProto'EnumReservedRange
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, start__field_descriptor),
(Data.ProtoLens.Tag 2, end__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_EnumDescriptorProto'EnumReservedRange'_unknownFields
(\ x__ y__ ->
x__{_EnumDescriptorProto'EnumReservedRange'_unknownFields = y__})
defMessage
= EnumDescriptorProto'EnumReservedRange{_EnumDescriptorProto'EnumReservedRange'start
= Prelude.Nothing,
_EnumDescriptorProto'EnumReservedRange'end =
Prelude.Nothing,
_EnumDescriptorProto'EnumReservedRange'_unknownFields
= ([])}
instance Control.DeepSeq.NFData
EnumDescriptorProto'EnumReservedRange
where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_EnumDescriptorProto'EnumReservedRange'_unknownFields x__)
(Control.DeepSeq.deepseq
(_EnumDescriptorProto'EnumReservedRange'start x__)
(Control.DeepSeq.deepseq
(_EnumDescriptorProto'EnumReservedRange'end x__)
(())))
data EnumOptions = EnumOptions{_EnumOptions'allowAlias ::
!(Prelude.Maybe Prelude.Bool),
_EnumOptions'deprecated :: !(Prelude.Maybe Prelude.Bool),
_EnumOptions'uninterpretedOption :: ![UninterpretedOption],
_EnumOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show EnumOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' EnumOptions "allowAlias"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumOptions'allowAlias
(\ x__ y__ -> x__{_EnumOptions'allowAlias = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' EnumOptions "maybe'allowAlias"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumOptions'allowAlias
(\ x__ y__ -> x__{_EnumOptions'allowAlias = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumOptions'deprecated
(\ x__ y__ -> x__{_EnumOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' EnumOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumOptions'deprecated
(\ x__ y__ -> x__{_EnumOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumOptions'uninterpretedOption
(\ x__ y__ -> x__{_EnumOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message EnumOptions where
messageName _ = Data.Text.pack "google.protobuf.EnumOptions"
fieldsByTag
= let allowAlias__field_descriptor
= Data.ProtoLens.FieldDescriptor "allow_alias"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'allowAlias")))
:: Data.ProtoLens.FieldDescriptor EnumOptions
deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor EnumOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor EnumOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 2, allowAlias__field_descriptor),
(Data.ProtoLens.Tag 3, deprecated__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _EnumOptions'_unknownFields
(\ x__ y__ -> x__{_EnumOptions'_unknownFields = y__})
defMessage
= EnumOptions{_EnumOptions'allowAlias = Prelude.Nothing,
_EnumOptions'deprecated = Prelude.Nothing,
_EnumOptions'uninterpretedOption = [],
_EnumOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData EnumOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_EnumOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_EnumOptions'allowAlias x__)
(Control.DeepSeq.deepseq (_EnumOptions'deprecated x__)
(Control.DeepSeq.deepseq (_EnumOptions'uninterpretedOption x__)
(()))))
data EnumValueDescriptorProto = EnumValueDescriptorProto{_EnumValueDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_EnumValueDescriptorProto'number ::
!(Prelude.Maybe Data.Int.Int32),
_EnumValueDescriptorProto'options ::
!(Prelude.Maybe EnumValueOptions),
_EnumValueDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show EnumValueDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' EnumValueDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueDescriptorProto'name
(\ x__ y__ -> x__{_EnumValueDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' EnumValueDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueDescriptorProto'name
(\ x__ y__ -> x__{_EnumValueDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumValueDescriptorProto "number"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueDescriptorProto'number
(\ x__ y__ -> x__{_EnumValueDescriptorProto'number = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' EnumValueDescriptorProto
"maybe'number"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueDescriptorProto'number
(\ x__ y__ -> x__{_EnumValueDescriptorProto'number = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumValueDescriptorProto "options"
(EnumValueOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueDescriptorProto'options
(\ x__ y__ -> x__{_EnumValueDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' EnumValueDescriptorProto
"maybe'options"
(Prelude.Maybe EnumValueOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueDescriptorProto'options
(\ x__ y__ -> x__{_EnumValueDescriptorProto'options = y__}))
Prelude.id
instance Data.ProtoLens.Message EnumValueDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.EnumValueDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor EnumValueDescriptorProto
number__field_descriptor
= Data.ProtoLens.FieldDescriptor "number"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'number")))
:: Data.ProtoLens.FieldDescriptor EnumValueDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor EnumValueOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor EnumValueDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, number__field_descriptor),
(Data.ProtoLens.Tag 3, options__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_EnumValueDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_EnumValueDescriptorProto'_unknownFields = y__})
defMessage
= EnumValueDescriptorProto{_EnumValueDescriptorProto'name =
Prelude.Nothing,
_EnumValueDescriptorProto'number = Prelude.Nothing,
_EnumValueDescriptorProto'options = Prelude.Nothing,
_EnumValueDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData EnumValueDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_EnumValueDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_EnumValueDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_EnumValueDescriptorProto'number x__)
(Control.DeepSeq.deepseq (_EnumValueDescriptorProto'options x__)
(()))))
data EnumValueOptions = EnumValueOptions{_EnumValueOptions'deprecated
:: !(Prelude.Maybe Prelude.Bool),
_EnumValueOptions'uninterpretedOption ::
![UninterpretedOption],
_EnumValueOptions'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show EnumValueOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' EnumValueOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueOptions'deprecated
(\ x__ y__ -> x__{_EnumValueOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' EnumValueOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueOptions'deprecated
(\ x__ y__ -> x__{_EnumValueOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' EnumValueOptions
"uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _EnumValueOptions'uninterpretedOption
(\ x__ y__ -> x__{_EnumValueOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message EnumValueOptions where
messageName _ = Data.Text.pack "google.protobuf.EnumValueOptions"
fieldsByTag
= let deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor EnumValueOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor EnumValueOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, deprecated__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _EnumValueOptions'_unknownFields
(\ x__ y__ -> x__{_EnumValueOptions'_unknownFields = y__})
defMessage
= EnumValueOptions{_EnumValueOptions'deprecated = Prelude.Nothing,
_EnumValueOptions'uninterpretedOption = [],
_EnumValueOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData EnumValueOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_EnumValueOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_EnumValueOptions'deprecated x__)
(Control.DeepSeq.deepseq
(_EnumValueOptions'uninterpretedOption x__)
(())))
data ExtensionRangeOptions = ExtensionRangeOptions{_ExtensionRangeOptions'uninterpretedOption
:: ![UninterpretedOption],
_ExtensionRangeOptions'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show ExtensionRangeOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' ExtensionRangeOptions
"uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_ExtensionRangeOptions'uninterpretedOption
(\ x__ y__ ->
x__{_ExtensionRangeOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message ExtensionRangeOptions where
messageName _
= Data.Text.pack "google.protobuf.ExtensionRangeOptions"
fieldsByTag
= let uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor ExtensionRangeOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _ExtensionRangeOptions'_unknownFields
(\ x__ y__ -> x__{_ExtensionRangeOptions'_unknownFields = y__})
defMessage
= ExtensionRangeOptions{_ExtensionRangeOptions'uninterpretedOption
= [],
_ExtensionRangeOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData ExtensionRangeOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_ExtensionRangeOptions'_unknownFields x__)
(Control.DeepSeq.deepseq
(_ExtensionRangeOptions'uninterpretedOption x__)
(()))
data FieldDescriptorProto = FieldDescriptorProto{_FieldDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_FieldDescriptorProto'number ::
!(Prelude.Maybe Data.Int.Int32),
_FieldDescriptorProto'label ::
!(Prelude.Maybe FieldDescriptorProto'Label),
_FieldDescriptorProto'type' ::
!(Prelude.Maybe FieldDescriptorProto'Type),
_FieldDescriptorProto'typeName ::
!(Prelude.Maybe Data.Text.Text),
_FieldDescriptorProto'extendee ::
!(Prelude.Maybe Data.Text.Text),
_FieldDescriptorProto'defaultValue ::
!(Prelude.Maybe Data.Text.Text),
_FieldDescriptorProto'oneofIndex ::
!(Prelude.Maybe Data.Int.Int32),
_FieldDescriptorProto'jsonName ::
!(Prelude.Maybe Data.Text.Text),
_FieldDescriptorProto'options ::
!(Prelude.Maybe FieldOptions),
_FieldDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show FieldDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' FieldDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'name
(\ x__ y__ -> x__{_FieldDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'name
(\ x__ y__ -> x__{_FieldDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "number"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'number
(\ x__ y__ -> x__{_FieldDescriptorProto'number = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'number"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'number
(\ x__ y__ -> x__{_FieldDescriptorProto'number = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "label"
(FieldDescriptorProto'Label)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'label
(\ x__ y__ -> x__{_FieldDescriptorProto'label = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'label"
(Prelude.Maybe FieldDescriptorProto'Label)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'label
(\ x__ y__ -> x__{_FieldDescriptorProto'label = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "type'"
(FieldDescriptorProto'Type)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'type'
(\ x__ y__ -> x__{_FieldDescriptorProto'type' = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'type'"
(Prelude.Maybe FieldDescriptorProto'Type)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'type'
(\ x__ y__ -> x__{_FieldDescriptorProto'type' = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "typeName"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'typeName
(\ x__ y__ -> x__{_FieldDescriptorProto'typeName = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'typeName"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'typeName
(\ x__ y__ -> x__{_FieldDescriptorProto'typeName = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "extendee"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'extendee
(\ x__ y__ -> x__{_FieldDescriptorProto'extendee = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'extendee"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'extendee
(\ x__ y__ -> x__{_FieldDescriptorProto'extendee = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "defaultValue"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'defaultValue
(\ x__ y__ -> x__{_FieldDescriptorProto'defaultValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto
"maybe'defaultValue"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'defaultValue
(\ x__ y__ -> x__{_FieldDescriptorProto'defaultValue = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "oneofIndex"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'oneofIndex
(\ x__ y__ -> x__{_FieldDescriptorProto'oneofIndex = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto
"maybe'oneofIndex"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'oneofIndex
(\ x__ y__ -> x__{_FieldDescriptorProto'oneofIndex = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "jsonName"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'jsonName
(\ x__ y__ -> x__{_FieldDescriptorProto'jsonName = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'jsonName"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'jsonName
(\ x__ y__ -> x__{_FieldDescriptorProto'jsonName = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldDescriptorProto "options"
(FieldOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'options
(\ x__ y__ -> x__{_FieldDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' FieldDescriptorProto "maybe'options"
(Prelude.Maybe FieldOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldDescriptorProto'options
(\ x__ y__ -> x__{_FieldDescriptorProto'options = y__}))
Prelude.id
instance Data.ProtoLens.Message FieldDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.FieldDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
number__field_descriptor
= Data.ProtoLens.FieldDescriptor "number"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'number")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
label__field_descriptor
= Data.ProtoLens.FieldDescriptor "label"
(Data.ProtoLens.ScalarField Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor FieldDescriptorProto'Label)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'label")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
type'__field_descriptor
= Data.ProtoLens.FieldDescriptor "type"
(Data.ProtoLens.ScalarField Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor FieldDescriptorProto'Type)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'type'")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
typeName__field_descriptor
= Data.ProtoLens.FieldDescriptor "type_name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'typeName")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
extendee__field_descriptor
= Data.ProtoLens.FieldDescriptor "extendee"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'extendee")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
defaultValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "default_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'defaultValue")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
oneofIndex__field_descriptor
= Data.ProtoLens.FieldDescriptor "oneof_index"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'oneofIndex")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
jsonName__field_descriptor
= Data.ProtoLens.FieldDescriptor "json_name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'jsonName")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor FieldOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor FieldDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 3, number__field_descriptor),
(Data.ProtoLens.Tag 4, label__field_descriptor),
(Data.ProtoLens.Tag 5, type'__field_descriptor),
(Data.ProtoLens.Tag 6, typeName__field_descriptor),
(Data.ProtoLens.Tag 2, extendee__field_descriptor),
(Data.ProtoLens.Tag 7, defaultValue__field_descriptor),
(Data.ProtoLens.Tag 9, oneofIndex__field_descriptor),
(Data.ProtoLens.Tag 10, jsonName__field_descriptor),
(Data.ProtoLens.Tag 8, options__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _FieldDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_FieldDescriptorProto'_unknownFields = y__})
defMessage
= FieldDescriptorProto{_FieldDescriptorProto'name =
Prelude.Nothing,
_FieldDescriptorProto'number = Prelude.Nothing,
_FieldDescriptorProto'label = Prelude.Nothing,
_FieldDescriptorProto'type' = Prelude.Nothing,
_FieldDescriptorProto'typeName = Prelude.Nothing,
_FieldDescriptorProto'extendee = Prelude.Nothing,
_FieldDescriptorProto'defaultValue = Prelude.Nothing,
_FieldDescriptorProto'oneofIndex = Prelude.Nothing,
_FieldDescriptorProto'jsonName = Prelude.Nothing,
_FieldDescriptorProto'options = Prelude.Nothing,
_FieldDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData FieldDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_FieldDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'number x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'label x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'type' x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'typeName x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'extendee x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'defaultValue x__)
(Control.DeepSeq.deepseq (_FieldDescriptorProto'oneofIndex x__)
(Control.DeepSeq.deepseq
(_FieldDescriptorProto'jsonName x__)
(Control.DeepSeq.deepseq
(_FieldDescriptorProto'options x__)
(())))))))))))
data FieldDescriptorProto'Label = FieldDescriptorProto'LABEL_OPTIONAL
| FieldDescriptorProto'LABEL_REQUIRED
| FieldDescriptorProto'LABEL_REPEATED
deriving (Prelude.Show, Prelude.Eq, Prelude.Ord)
instance Data.ProtoLens.FieldDefault FieldDescriptorProto'Label
where
fieldDefault = FieldDescriptorProto'LABEL_OPTIONAL
instance Data.ProtoLens.MessageEnum FieldDescriptorProto'Label
where
maybeToEnum 1 = Prelude.Just FieldDescriptorProto'LABEL_OPTIONAL
maybeToEnum 2 = Prelude.Just FieldDescriptorProto'LABEL_REQUIRED
maybeToEnum 3 = Prelude.Just FieldDescriptorProto'LABEL_REPEATED
maybeToEnum _ = Prelude.Nothing
showEnum FieldDescriptorProto'LABEL_OPTIONAL = "LABEL_OPTIONAL"
showEnum FieldDescriptorProto'LABEL_REQUIRED = "LABEL_REQUIRED"
showEnum FieldDescriptorProto'LABEL_REPEATED = "LABEL_REPEATED"
readEnum "LABEL_OPTIONAL"
= Prelude.Just FieldDescriptorProto'LABEL_OPTIONAL
readEnum "LABEL_REQUIRED"
= Prelude.Just FieldDescriptorProto'LABEL_REQUIRED
readEnum "LABEL_REPEATED"
= Prelude.Just FieldDescriptorProto'LABEL_REPEATED
readEnum _ = Prelude.Nothing
instance Prelude.Enum FieldDescriptorProto'Label where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum Label: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum FieldDescriptorProto'LABEL_OPTIONAL = 1
fromEnum FieldDescriptorProto'LABEL_REQUIRED = 2
fromEnum FieldDescriptorProto'LABEL_REPEATED = 3
succ FieldDescriptorProto'LABEL_REPEATED
= Prelude.error
"FieldDescriptorProto'Label.succ: bad argument FieldDescriptorProto'LABEL_REPEATED. This value would be out of bounds."
succ FieldDescriptorProto'LABEL_OPTIONAL
= FieldDescriptorProto'LABEL_REQUIRED
succ FieldDescriptorProto'LABEL_REQUIRED
= FieldDescriptorProto'LABEL_REPEATED
pred FieldDescriptorProto'LABEL_OPTIONAL
= Prelude.error
"FieldDescriptorProto'Label.pred: bad argument FieldDescriptorProto'LABEL_OPTIONAL. This value would be out of bounds."
pred FieldDescriptorProto'LABEL_REQUIRED
= FieldDescriptorProto'LABEL_OPTIONAL
pred FieldDescriptorProto'LABEL_REPEATED
= FieldDescriptorProto'LABEL_REQUIRED
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded FieldDescriptorProto'Label where
minBound = FieldDescriptorProto'LABEL_OPTIONAL
maxBound = FieldDescriptorProto'LABEL_REPEATED
instance Control.DeepSeq.NFData FieldDescriptorProto'Label where
rnf x__ = Prelude.seq x__ (())
data FieldDescriptorProto'Type = FieldDescriptorProto'TYPE_DOUBLE
| FieldDescriptorProto'TYPE_FLOAT
| FieldDescriptorProto'TYPE_INT64
| FieldDescriptorProto'TYPE_UINT64
| FieldDescriptorProto'TYPE_INT32
| FieldDescriptorProto'TYPE_FIXED64
| FieldDescriptorProto'TYPE_FIXED32
| FieldDescriptorProto'TYPE_BOOL
| FieldDescriptorProto'TYPE_STRING
| FieldDescriptorProto'TYPE_GROUP
| FieldDescriptorProto'TYPE_MESSAGE
| FieldDescriptorProto'TYPE_BYTES
| FieldDescriptorProto'TYPE_UINT32
| FieldDescriptorProto'TYPE_ENUM
| FieldDescriptorProto'TYPE_SFIXED32
| FieldDescriptorProto'TYPE_SFIXED64
| FieldDescriptorProto'TYPE_SINT32
| FieldDescriptorProto'TYPE_SINT64
deriving (Prelude.Show, Prelude.Eq, Prelude.Ord)
instance Data.ProtoLens.FieldDefault FieldDescriptorProto'Type
where
fieldDefault = FieldDescriptorProto'TYPE_DOUBLE
instance Data.ProtoLens.MessageEnum FieldDescriptorProto'Type where
maybeToEnum 1 = Prelude.Just FieldDescriptorProto'TYPE_DOUBLE
maybeToEnum 2 = Prelude.Just FieldDescriptorProto'TYPE_FLOAT
maybeToEnum 3 = Prelude.Just FieldDescriptorProto'TYPE_INT64
maybeToEnum 4 = Prelude.Just FieldDescriptorProto'TYPE_UINT64
maybeToEnum 5 = Prelude.Just FieldDescriptorProto'TYPE_INT32
maybeToEnum 6 = Prelude.Just FieldDescriptorProto'TYPE_FIXED64
maybeToEnum 7 = Prelude.Just FieldDescriptorProto'TYPE_FIXED32
maybeToEnum 8 = Prelude.Just FieldDescriptorProto'TYPE_BOOL
maybeToEnum 9 = Prelude.Just FieldDescriptorProto'TYPE_STRING
maybeToEnum 10 = Prelude.Just FieldDescriptorProto'TYPE_GROUP
maybeToEnum 11 = Prelude.Just FieldDescriptorProto'TYPE_MESSAGE
maybeToEnum 12 = Prelude.Just FieldDescriptorProto'TYPE_BYTES
maybeToEnum 13 = Prelude.Just FieldDescriptorProto'TYPE_UINT32
maybeToEnum 14 = Prelude.Just FieldDescriptorProto'TYPE_ENUM
maybeToEnum 15 = Prelude.Just FieldDescriptorProto'TYPE_SFIXED32
maybeToEnum 16 = Prelude.Just FieldDescriptorProto'TYPE_SFIXED64
maybeToEnum 17 = Prelude.Just FieldDescriptorProto'TYPE_SINT32
maybeToEnum 18 = Prelude.Just FieldDescriptorProto'TYPE_SINT64
maybeToEnum _ = Prelude.Nothing
showEnum FieldDescriptorProto'TYPE_DOUBLE = "TYPE_DOUBLE"
showEnum FieldDescriptorProto'TYPE_FLOAT = "TYPE_FLOAT"
showEnum FieldDescriptorProto'TYPE_INT64 = "TYPE_INT64"
showEnum FieldDescriptorProto'TYPE_UINT64 = "TYPE_UINT64"
showEnum FieldDescriptorProto'TYPE_INT32 = "TYPE_INT32"
showEnum FieldDescriptorProto'TYPE_FIXED64 = "TYPE_FIXED64"
showEnum FieldDescriptorProto'TYPE_FIXED32 = "TYPE_FIXED32"
showEnum FieldDescriptorProto'TYPE_BOOL = "TYPE_BOOL"
showEnum FieldDescriptorProto'TYPE_STRING = "TYPE_STRING"
showEnum FieldDescriptorProto'TYPE_GROUP = "TYPE_GROUP"
showEnum FieldDescriptorProto'TYPE_MESSAGE = "TYPE_MESSAGE"
showEnum FieldDescriptorProto'TYPE_BYTES = "TYPE_BYTES"
showEnum FieldDescriptorProto'TYPE_UINT32 = "TYPE_UINT32"
showEnum FieldDescriptorProto'TYPE_ENUM = "TYPE_ENUM"
showEnum FieldDescriptorProto'TYPE_SFIXED32 = "TYPE_SFIXED32"
showEnum FieldDescriptorProto'TYPE_SFIXED64 = "TYPE_SFIXED64"
showEnum FieldDescriptorProto'TYPE_SINT32 = "TYPE_SINT32"
showEnum FieldDescriptorProto'TYPE_SINT64 = "TYPE_SINT64"
readEnum "TYPE_DOUBLE"
= Prelude.Just FieldDescriptorProto'TYPE_DOUBLE
readEnum "TYPE_FLOAT"
= Prelude.Just FieldDescriptorProto'TYPE_FLOAT
readEnum "TYPE_INT64"
= Prelude.Just FieldDescriptorProto'TYPE_INT64
readEnum "TYPE_UINT64"
= Prelude.Just FieldDescriptorProto'TYPE_UINT64
readEnum "TYPE_INT32"
= Prelude.Just FieldDescriptorProto'TYPE_INT32
readEnum "TYPE_FIXED64"
= Prelude.Just FieldDescriptorProto'TYPE_FIXED64
readEnum "TYPE_FIXED32"
= Prelude.Just FieldDescriptorProto'TYPE_FIXED32
readEnum "TYPE_BOOL" = Prelude.Just FieldDescriptorProto'TYPE_BOOL
readEnum "TYPE_STRING"
= Prelude.Just FieldDescriptorProto'TYPE_STRING
readEnum "TYPE_GROUP"
= Prelude.Just FieldDescriptorProto'TYPE_GROUP
readEnum "TYPE_MESSAGE"
= Prelude.Just FieldDescriptorProto'TYPE_MESSAGE
readEnum "TYPE_BYTES"
= Prelude.Just FieldDescriptorProto'TYPE_BYTES
readEnum "TYPE_UINT32"
= Prelude.Just FieldDescriptorProto'TYPE_UINT32
readEnum "TYPE_ENUM" = Prelude.Just FieldDescriptorProto'TYPE_ENUM
readEnum "TYPE_SFIXED32"
= Prelude.Just FieldDescriptorProto'TYPE_SFIXED32
readEnum "TYPE_SFIXED64"
= Prelude.Just FieldDescriptorProto'TYPE_SFIXED64
readEnum "TYPE_SINT32"
= Prelude.Just FieldDescriptorProto'TYPE_SINT32
readEnum "TYPE_SINT64"
= Prelude.Just FieldDescriptorProto'TYPE_SINT64
readEnum _ = Prelude.Nothing
instance Prelude.Enum FieldDescriptorProto'Type where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum Type: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum FieldDescriptorProto'TYPE_DOUBLE = 1
fromEnum FieldDescriptorProto'TYPE_FLOAT = 2
fromEnum FieldDescriptorProto'TYPE_INT64 = 3
fromEnum FieldDescriptorProto'TYPE_UINT64 = 4
fromEnum FieldDescriptorProto'TYPE_INT32 = 5
fromEnum FieldDescriptorProto'TYPE_FIXED64 = 6
fromEnum FieldDescriptorProto'TYPE_FIXED32 = 7
fromEnum FieldDescriptorProto'TYPE_BOOL = 8
fromEnum FieldDescriptorProto'TYPE_STRING = 9
fromEnum FieldDescriptorProto'TYPE_GROUP = 10
fromEnum FieldDescriptorProto'TYPE_MESSAGE = 11
fromEnum FieldDescriptorProto'TYPE_BYTES = 12
fromEnum FieldDescriptorProto'TYPE_UINT32 = 13
fromEnum FieldDescriptorProto'TYPE_ENUM = 14
fromEnum FieldDescriptorProto'TYPE_SFIXED32 = 15
fromEnum FieldDescriptorProto'TYPE_SFIXED64 = 16
fromEnum FieldDescriptorProto'TYPE_SINT32 = 17
fromEnum FieldDescriptorProto'TYPE_SINT64 = 18
succ FieldDescriptorProto'TYPE_SINT64
= Prelude.error
"FieldDescriptorProto'Type.succ: bad argument FieldDescriptorProto'TYPE_SINT64. This value would be out of bounds."
succ FieldDescriptorProto'TYPE_DOUBLE
= FieldDescriptorProto'TYPE_FLOAT
succ FieldDescriptorProto'TYPE_FLOAT
= FieldDescriptorProto'TYPE_INT64
succ FieldDescriptorProto'TYPE_INT64
= FieldDescriptorProto'TYPE_UINT64
succ FieldDescriptorProto'TYPE_UINT64
= FieldDescriptorProto'TYPE_INT32
succ FieldDescriptorProto'TYPE_INT32
= FieldDescriptorProto'TYPE_FIXED64
succ FieldDescriptorProto'TYPE_FIXED64
= FieldDescriptorProto'TYPE_FIXED32
succ FieldDescriptorProto'TYPE_FIXED32
= FieldDescriptorProto'TYPE_BOOL
succ FieldDescriptorProto'TYPE_BOOL
= FieldDescriptorProto'TYPE_STRING
succ FieldDescriptorProto'TYPE_STRING
= FieldDescriptorProto'TYPE_GROUP
succ FieldDescriptorProto'TYPE_GROUP
= FieldDescriptorProto'TYPE_MESSAGE
succ FieldDescriptorProto'TYPE_MESSAGE
= FieldDescriptorProto'TYPE_BYTES
succ FieldDescriptorProto'TYPE_BYTES
= FieldDescriptorProto'TYPE_UINT32
succ FieldDescriptorProto'TYPE_UINT32
= FieldDescriptorProto'TYPE_ENUM
succ FieldDescriptorProto'TYPE_ENUM
= FieldDescriptorProto'TYPE_SFIXED32
succ FieldDescriptorProto'TYPE_SFIXED32
= FieldDescriptorProto'TYPE_SFIXED64
succ FieldDescriptorProto'TYPE_SFIXED64
= FieldDescriptorProto'TYPE_SINT32
succ FieldDescriptorProto'TYPE_SINT32
= FieldDescriptorProto'TYPE_SINT64
pred FieldDescriptorProto'TYPE_DOUBLE
= Prelude.error
"FieldDescriptorProto'Type.pred: bad argument FieldDescriptorProto'TYPE_DOUBLE. This value would be out of bounds."
pred FieldDescriptorProto'TYPE_FLOAT
= FieldDescriptorProto'TYPE_DOUBLE
pred FieldDescriptorProto'TYPE_INT64
= FieldDescriptorProto'TYPE_FLOAT
pred FieldDescriptorProto'TYPE_UINT64
= FieldDescriptorProto'TYPE_INT64
pred FieldDescriptorProto'TYPE_INT32
= FieldDescriptorProto'TYPE_UINT64
pred FieldDescriptorProto'TYPE_FIXED64
= FieldDescriptorProto'TYPE_INT32
pred FieldDescriptorProto'TYPE_FIXED32
= FieldDescriptorProto'TYPE_FIXED64
pred FieldDescriptorProto'TYPE_BOOL
= FieldDescriptorProto'TYPE_FIXED32
pred FieldDescriptorProto'TYPE_STRING
= FieldDescriptorProto'TYPE_BOOL
pred FieldDescriptorProto'TYPE_GROUP
= FieldDescriptorProto'TYPE_STRING
pred FieldDescriptorProto'TYPE_MESSAGE
= FieldDescriptorProto'TYPE_GROUP
pred FieldDescriptorProto'TYPE_BYTES
= FieldDescriptorProto'TYPE_MESSAGE
pred FieldDescriptorProto'TYPE_UINT32
= FieldDescriptorProto'TYPE_BYTES
pred FieldDescriptorProto'TYPE_ENUM
= FieldDescriptorProto'TYPE_UINT32
pred FieldDescriptorProto'TYPE_SFIXED32
= FieldDescriptorProto'TYPE_ENUM
pred FieldDescriptorProto'TYPE_SFIXED64
= FieldDescriptorProto'TYPE_SFIXED32
pred FieldDescriptorProto'TYPE_SINT32
= FieldDescriptorProto'TYPE_SFIXED64
pred FieldDescriptorProto'TYPE_SINT64
= FieldDescriptorProto'TYPE_SINT32
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded FieldDescriptorProto'Type where
minBound = FieldDescriptorProto'TYPE_DOUBLE
maxBound = FieldDescriptorProto'TYPE_SINT64
instance Control.DeepSeq.NFData FieldDescriptorProto'Type where
rnf x__ = Prelude.seq x__ (())
data FieldOptions = FieldOptions{_FieldOptions'ctype ::
!(Prelude.Maybe FieldOptions'CType),
_FieldOptions'packed :: !(Prelude.Maybe Prelude.Bool),
_FieldOptions'jstype :: !(Prelude.Maybe FieldOptions'JSType),
_FieldOptions'lazy :: !(Prelude.Maybe Prelude.Bool),
_FieldOptions'deprecated :: !(Prelude.Maybe Prelude.Bool),
_FieldOptions'weak :: !(Prelude.Maybe Prelude.Bool),
_FieldOptions'uninterpretedOption :: ![UninterpretedOption],
_FieldOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show FieldOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' FieldOptions "ctype"
(FieldOptions'CType)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'ctype
(\ x__ y__ -> x__{_FieldOptions'ctype = y__}))
(Data.ProtoLens.maybeLens FieldOptions'STRING)
instance Lens.Labels.HasLens' FieldOptions "maybe'ctype"
(Prelude.Maybe FieldOptions'CType)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'ctype
(\ x__ y__ -> x__{_FieldOptions'ctype = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldOptions "packed" (Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'packed
(\ x__ y__ -> x__{_FieldOptions'packed = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FieldOptions "maybe'packed"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'packed
(\ x__ y__ -> x__{_FieldOptions'packed = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldOptions "jstype"
(FieldOptions'JSType)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'jstype
(\ x__ y__ -> x__{_FieldOptions'jstype = y__}))
(Data.ProtoLens.maybeLens FieldOptions'JS_NORMAL)
instance Lens.Labels.HasLens' FieldOptions "maybe'jstype"
(Prelude.Maybe FieldOptions'JSType)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'jstype
(\ x__ y__ -> x__{_FieldOptions'jstype = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldOptions "lazy" (Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'lazy
(\ x__ y__ -> x__{_FieldOptions'lazy = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FieldOptions "maybe'lazy"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'lazy
(\ x__ y__ -> x__{_FieldOptions'lazy = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'deprecated
(\ x__ y__ -> x__{_FieldOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FieldOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'deprecated
(\ x__ y__ -> x__{_FieldOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldOptions "weak" (Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'weak
(\ x__ y__ -> x__{_FieldOptions'weak = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FieldOptions "maybe'weak"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'weak
(\ x__ y__ -> x__{_FieldOptions'weak = y__}))
Prelude.id
instance Lens.Labels.HasLens' FieldOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FieldOptions'uninterpretedOption
(\ x__ y__ -> x__{_FieldOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message FieldOptions where
messageName _ = Data.Text.pack "google.protobuf.FieldOptions"
fieldsByTag
= let ctype__field_descriptor
= Data.ProtoLens.FieldDescriptor "ctype"
(Data.ProtoLens.ScalarField Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor FieldOptions'CType)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'ctype")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
packed__field_descriptor
= Data.ProtoLens.FieldDescriptor "packed"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'packed")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
jstype__field_descriptor
= Data.ProtoLens.FieldDescriptor "jstype"
(Data.ProtoLens.ScalarField Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor FieldOptions'JSType)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'jstype")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
lazy__field_descriptor
= Data.ProtoLens.FieldDescriptor "lazy"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'lazy")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
weak__field_descriptor
= Data.ProtoLens.FieldDescriptor "weak"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'weak")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor FieldOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, ctype__field_descriptor),
(Data.ProtoLens.Tag 2, packed__field_descriptor),
(Data.ProtoLens.Tag 6, jstype__field_descriptor),
(Data.ProtoLens.Tag 5, lazy__field_descriptor),
(Data.ProtoLens.Tag 3, deprecated__field_descriptor),
(Data.ProtoLens.Tag 10, weak__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _FieldOptions'_unknownFields
(\ x__ y__ -> x__{_FieldOptions'_unknownFields = y__})
defMessage
= FieldOptions{_FieldOptions'ctype = Prelude.Nothing,
_FieldOptions'packed = Prelude.Nothing,
_FieldOptions'jstype = Prelude.Nothing,
_FieldOptions'lazy = Prelude.Nothing,
_FieldOptions'deprecated = Prelude.Nothing,
_FieldOptions'weak = Prelude.Nothing,
_FieldOptions'uninterpretedOption = [],
_FieldOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData FieldOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_FieldOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_FieldOptions'ctype x__)
(Control.DeepSeq.deepseq (_FieldOptions'packed x__)
(Control.DeepSeq.deepseq (_FieldOptions'jstype x__)
(Control.DeepSeq.deepseq (_FieldOptions'lazy x__)
(Control.DeepSeq.deepseq (_FieldOptions'deprecated x__)
(Control.DeepSeq.deepseq (_FieldOptions'weak x__)
(Control.DeepSeq.deepseq (_FieldOptions'uninterpretedOption x__)
(()))))))))
data FieldOptions'CType = FieldOptions'STRING
| FieldOptions'CORD
| FieldOptions'STRING_PIECE
deriving (Prelude.Show, Prelude.Eq, Prelude.Ord)
instance Data.ProtoLens.FieldDefault FieldOptions'CType where
fieldDefault = FieldOptions'STRING
instance Data.ProtoLens.MessageEnum FieldOptions'CType where
maybeToEnum 0 = Prelude.Just FieldOptions'STRING
maybeToEnum 1 = Prelude.Just FieldOptions'CORD
maybeToEnum 2 = Prelude.Just FieldOptions'STRING_PIECE
maybeToEnum _ = Prelude.Nothing
showEnum FieldOptions'STRING = "STRING"
showEnum FieldOptions'CORD = "CORD"
showEnum FieldOptions'STRING_PIECE = "STRING_PIECE"
readEnum "STRING" = Prelude.Just FieldOptions'STRING
readEnum "CORD" = Prelude.Just FieldOptions'CORD
readEnum "STRING_PIECE" = Prelude.Just FieldOptions'STRING_PIECE
readEnum _ = Prelude.Nothing
instance Prelude.Enum FieldOptions'CType where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum CType: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum FieldOptions'STRING = 0
fromEnum FieldOptions'CORD = 1
fromEnum FieldOptions'STRING_PIECE = 2
succ FieldOptions'STRING_PIECE
= Prelude.error
"FieldOptions'CType.succ: bad argument FieldOptions'STRING_PIECE. This value would be out of bounds."
succ FieldOptions'STRING = FieldOptions'CORD
succ FieldOptions'CORD = FieldOptions'STRING_PIECE
pred FieldOptions'STRING
= Prelude.error
"FieldOptions'CType.pred: bad argument FieldOptions'STRING. This value would be out of bounds."
pred FieldOptions'CORD = FieldOptions'STRING
pred FieldOptions'STRING_PIECE = FieldOptions'CORD
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded FieldOptions'CType where
minBound = FieldOptions'STRING
maxBound = FieldOptions'STRING_PIECE
instance Control.DeepSeq.NFData FieldOptions'CType where
rnf x__ = Prelude.seq x__ (())
data FieldOptions'JSType = FieldOptions'JS_NORMAL
| FieldOptions'JS_STRING
| FieldOptions'JS_NUMBER
deriving (Prelude.Show, Prelude.Eq, Prelude.Ord)
instance Data.ProtoLens.FieldDefault FieldOptions'JSType where
fieldDefault = FieldOptions'JS_NORMAL
instance Data.ProtoLens.MessageEnum FieldOptions'JSType where
maybeToEnum 0 = Prelude.Just FieldOptions'JS_NORMAL
maybeToEnum 1 = Prelude.Just FieldOptions'JS_STRING
maybeToEnum 2 = Prelude.Just FieldOptions'JS_NUMBER
maybeToEnum _ = Prelude.Nothing
showEnum FieldOptions'JS_NORMAL = "JS_NORMAL"
showEnum FieldOptions'JS_STRING = "JS_STRING"
showEnum FieldOptions'JS_NUMBER = "JS_NUMBER"
readEnum "JS_NORMAL" = Prelude.Just FieldOptions'JS_NORMAL
readEnum "JS_STRING" = Prelude.Just FieldOptions'JS_STRING
readEnum "JS_NUMBER" = Prelude.Just FieldOptions'JS_NUMBER
readEnum _ = Prelude.Nothing
instance Prelude.Enum FieldOptions'JSType where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum JSType: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum FieldOptions'JS_NORMAL = 0
fromEnum FieldOptions'JS_STRING = 1
fromEnum FieldOptions'JS_NUMBER = 2
succ FieldOptions'JS_NUMBER
= Prelude.error
"FieldOptions'JSType.succ: bad argument FieldOptions'JS_NUMBER. This value would be out of bounds."
succ FieldOptions'JS_NORMAL = FieldOptions'JS_STRING
succ FieldOptions'JS_STRING = FieldOptions'JS_NUMBER
pred FieldOptions'JS_NORMAL
= Prelude.error
"FieldOptions'JSType.pred: bad argument FieldOptions'JS_NORMAL. This value would be out of bounds."
pred FieldOptions'JS_STRING = FieldOptions'JS_NORMAL
pred FieldOptions'JS_NUMBER = FieldOptions'JS_STRING
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded FieldOptions'JSType where
minBound = FieldOptions'JS_NORMAL
maxBound = FieldOptions'JS_NUMBER
instance Control.DeepSeq.NFData FieldOptions'JSType where
rnf x__ = Prelude.seq x__ (())
data FileDescriptorProto = FileDescriptorProto{_FileDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_FileDescriptorProto'package ::
!(Prelude.Maybe Data.Text.Text),
_FileDescriptorProto'dependency :: ![Data.Text.Text],
_FileDescriptorProto'publicDependency ::
![Data.Int.Int32],
_FileDescriptorProto'weakDependency ::
![Data.Int.Int32],
_FileDescriptorProto'messageType ::
![DescriptorProto],
_FileDescriptorProto'enumType ::
![EnumDescriptorProto],
_FileDescriptorProto'service ::
![ServiceDescriptorProto],
_FileDescriptorProto'extension ::
![FieldDescriptorProto],
_FileDescriptorProto'options ::
!(Prelude.Maybe FileOptions),
_FileDescriptorProto'sourceCodeInfo ::
!(Prelude.Maybe SourceCodeInfo),
_FileDescriptorProto'syntax ::
!(Prelude.Maybe Data.Text.Text),
_FileDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show FileDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' FileDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'name
(\ x__ y__ -> x__{_FileDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'name
(\ x__ y__ -> x__{_FileDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "package"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'package
(\ x__ y__ -> x__{_FileDescriptorProto'package = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileDescriptorProto "maybe'package"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'package
(\ x__ y__ -> x__{_FileDescriptorProto'package = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "dependency"
([Data.Text.Text])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'dependency
(\ x__ y__ -> x__{_FileDescriptorProto'dependency = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto
"publicDependency"
([Data.Int.Int32])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'publicDependency
(\ x__ y__ -> x__{_FileDescriptorProto'publicDependency = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "weakDependency"
([Data.Int.Int32])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'weakDependency
(\ x__ y__ -> x__{_FileDescriptorProto'weakDependency = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "messageType"
([DescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'messageType
(\ x__ y__ -> x__{_FileDescriptorProto'messageType = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "enumType"
([EnumDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'enumType
(\ x__ y__ -> x__{_FileDescriptorProto'enumType = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "service"
([ServiceDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'service
(\ x__ y__ -> x__{_FileDescriptorProto'service = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "extension"
([FieldDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'extension
(\ x__ y__ -> x__{_FileDescriptorProto'extension = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "options"
(FileOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'options
(\ x__ y__ -> x__{_FileDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' FileDescriptorProto "maybe'options"
(Prelude.Maybe FileOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'options
(\ x__ y__ -> x__{_FileDescriptorProto'options = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "sourceCodeInfo"
(SourceCodeInfo)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'sourceCodeInfo
(\ x__ y__ -> x__{_FileDescriptorProto'sourceCodeInfo = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' FileDescriptorProto
"maybe'sourceCodeInfo"
(Prelude.Maybe SourceCodeInfo)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'sourceCodeInfo
(\ x__ y__ -> x__{_FileDescriptorProto'sourceCodeInfo = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileDescriptorProto "syntax"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'syntax
(\ x__ y__ -> x__{_FileDescriptorProto'syntax = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileDescriptorProto "maybe'syntax"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorProto'syntax
(\ x__ y__ -> x__{_FileDescriptorProto'syntax = y__}))
Prelude.id
instance Data.ProtoLens.Message FileDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.FileDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
package__field_descriptor
= Data.ProtoLens.FieldDescriptor "package"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'package")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
dependency__field_descriptor
= Data.ProtoLens.FieldDescriptor "dependency"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "dependency")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
publicDependency__field_descriptor
= Data.ProtoLens.FieldDescriptor "public_dependency"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "publicDependency")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
weakDependency__field_descriptor
= Data.ProtoLens.FieldDescriptor "weak_dependency"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "weakDependency")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
messageType__field_descriptor
= Data.ProtoLens.FieldDescriptor "message_type"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor DescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "messageType")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
enumType__field_descriptor
= Data.ProtoLens.FieldDescriptor "enum_type"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor EnumDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "enumType")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
service__field_descriptor
= Data.ProtoLens.FieldDescriptor "service"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ServiceDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "service")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
extension__field_descriptor
= Data.ProtoLens.FieldDescriptor "extension"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor FieldDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "extension")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor FileOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
sourceCodeInfo__field_descriptor
= Data.ProtoLens.FieldDescriptor "source_code_info"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor SourceCodeInfo)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'sourceCodeInfo")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
syntax__field_descriptor
= Data.ProtoLens.FieldDescriptor "syntax"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'syntax")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, package__field_descriptor),
(Data.ProtoLens.Tag 3, dependency__field_descriptor),
(Data.ProtoLens.Tag 10, publicDependency__field_descriptor),
(Data.ProtoLens.Tag 11, weakDependency__field_descriptor),
(Data.ProtoLens.Tag 4, messageType__field_descriptor),
(Data.ProtoLens.Tag 5, enumType__field_descriptor),
(Data.ProtoLens.Tag 6, service__field_descriptor),
(Data.ProtoLens.Tag 7, extension__field_descriptor),
(Data.ProtoLens.Tag 8, options__field_descriptor),
(Data.ProtoLens.Tag 9, sourceCodeInfo__field_descriptor),
(Data.ProtoLens.Tag 12, syntax__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _FileDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_FileDescriptorProto'_unknownFields = y__})
defMessage
= FileDescriptorProto{_FileDescriptorProto'name = Prelude.Nothing,
_FileDescriptorProto'package = Prelude.Nothing,
_FileDescriptorProto'dependency = [],
_FileDescriptorProto'publicDependency = [],
_FileDescriptorProto'weakDependency = [],
_FileDescriptorProto'messageType = [],
_FileDescriptorProto'enumType = [],
_FileDescriptorProto'service = [],
_FileDescriptorProto'extension = [],
_FileDescriptorProto'options = Prelude.Nothing,
_FileDescriptorProto'sourceCodeInfo = Prelude.Nothing,
_FileDescriptorProto'syntax = Prelude.Nothing,
_FileDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData FileDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_FileDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'package x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'dependency x__)
(Control.DeepSeq.deepseq
(_FileDescriptorProto'publicDependency x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'weakDependency x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'messageType x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'enumType x__)
(Control.DeepSeq.deepseq (_FileDescriptorProto'service x__)
(Control.DeepSeq.deepseq
(_FileDescriptorProto'extension x__)
(Control.DeepSeq.deepseq
(_FileDescriptorProto'options x__)
(Control.DeepSeq.deepseq
(_FileDescriptorProto'sourceCodeInfo x__)
(Control.DeepSeq.deepseq
(_FileDescriptorProto'syntax x__)
(())))))))))))))
data FileDescriptorSet = FileDescriptorSet{_FileDescriptorSet'file
:: ![FileDescriptorProto],
_FileDescriptorSet'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show FileDescriptorSet where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' FileDescriptorSet "file"
([FileDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileDescriptorSet'file
(\ x__ y__ -> x__{_FileDescriptorSet'file = y__}))
Prelude.id
instance Data.ProtoLens.Message FileDescriptorSet where
messageName _ = Data.Text.pack "google.protobuf.FileDescriptorSet"
fieldsByTag
= let file__field_descriptor
= Data.ProtoLens.FieldDescriptor "file"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor FileDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "file")))
:: Data.ProtoLens.FieldDescriptor FileDescriptorSet
in
Data.Map.fromList [(Data.ProtoLens.Tag 1, file__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _FileDescriptorSet'_unknownFields
(\ x__ y__ -> x__{_FileDescriptorSet'_unknownFields = y__})
defMessage
= FileDescriptorSet{_FileDescriptorSet'file = [],
_FileDescriptorSet'_unknownFields = ([])}
instance Control.DeepSeq.NFData FileDescriptorSet where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_FileDescriptorSet'_unknownFields x__)
(Control.DeepSeq.deepseq (_FileDescriptorSet'file x__) (()))
data FileOptions = FileOptions{_FileOptions'javaPackage ::
!(Prelude.Maybe Data.Text.Text),
_FileOptions'javaOuterClassname :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'javaMultipleFiles :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'javaGenerateEqualsAndHash ::
!(Prelude.Maybe Prelude.Bool),
_FileOptions'javaStringCheckUtf8 :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'optimizeFor ::
!(Prelude.Maybe FileOptions'OptimizeMode),
_FileOptions'goPackage :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'ccGenericServices :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'javaGenericServices :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'pyGenericServices :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'phpGenericServices :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'deprecated :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'ccEnableArenas :: !(Prelude.Maybe Prelude.Bool),
_FileOptions'objcClassPrefix :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'csharpNamespace :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'swiftPrefix :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'phpClassPrefix :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'phpNamespace :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'phpMetadataNamespace ::
!(Prelude.Maybe Data.Text.Text),
_FileOptions'rubyPackage :: !(Prelude.Maybe Data.Text.Text),
_FileOptions'uninterpretedOption :: ![UninterpretedOption],
_FileOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show FileOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' FileOptions "javaPackage"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaPackage
(\ x__ y__ -> x__{_FileOptions'javaPackage = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'javaPackage"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaPackage
(\ x__ y__ -> x__{_FileOptions'javaPackage = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "javaOuterClassname"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaOuterClassname
(\ x__ y__ -> x__{_FileOptions'javaOuterClassname = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions
"maybe'javaOuterClassname"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaOuterClassname
(\ x__ y__ -> x__{_FileOptions'javaOuterClassname = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "javaMultipleFiles"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaMultipleFiles
(\ x__ y__ -> x__{_FileOptions'javaMultipleFiles = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions "maybe'javaMultipleFiles"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaMultipleFiles
(\ x__ y__ -> x__{_FileOptions'javaMultipleFiles = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions
"javaGenerateEqualsAndHash"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaGenerateEqualsAndHash
(\ x__ y__ -> x__{_FileOptions'javaGenerateEqualsAndHash = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions
"maybe'javaGenerateEqualsAndHash"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaGenerateEqualsAndHash
(\ x__ y__ -> x__{_FileOptions'javaGenerateEqualsAndHash = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "javaStringCheckUtf8"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaStringCheckUtf8
(\ x__ y__ -> x__{_FileOptions'javaStringCheckUtf8 = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions
"maybe'javaStringCheckUtf8"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaStringCheckUtf8
(\ x__ y__ -> x__{_FileOptions'javaStringCheckUtf8 = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "optimizeFor"
(FileOptions'OptimizeMode)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'optimizeFor
(\ x__ y__ -> x__{_FileOptions'optimizeFor = y__}))
(Data.ProtoLens.maybeLens FileOptions'SPEED)
instance Lens.Labels.HasLens' FileOptions "maybe'optimizeFor"
(Prelude.Maybe FileOptions'OptimizeMode)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'optimizeFor
(\ x__ y__ -> x__{_FileOptions'optimizeFor = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "goPackage"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'goPackage
(\ x__ y__ -> x__{_FileOptions'goPackage = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'goPackage"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'goPackage
(\ x__ y__ -> x__{_FileOptions'goPackage = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "ccGenericServices"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'ccGenericServices
(\ x__ y__ -> x__{_FileOptions'ccGenericServices = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions "maybe'ccGenericServices"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'ccGenericServices
(\ x__ y__ -> x__{_FileOptions'ccGenericServices = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "javaGenericServices"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaGenericServices
(\ x__ y__ -> x__{_FileOptions'javaGenericServices = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions
"maybe'javaGenericServices"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'javaGenericServices
(\ x__ y__ -> x__{_FileOptions'javaGenericServices = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "pyGenericServices"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'pyGenericServices
(\ x__ y__ -> x__{_FileOptions'pyGenericServices = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions "maybe'pyGenericServices"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'pyGenericServices
(\ x__ y__ -> x__{_FileOptions'pyGenericServices = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "phpGenericServices"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpGenericServices
(\ x__ y__ -> x__{_FileOptions'phpGenericServices = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions
"maybe'phpGenericServices"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpGenericServices
(\ x__ y__ -> x__{_FileOptions'phpGenericServices = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'deprecated
(\ x__ y__ -> x__{_FileOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'deprecated
(\ x__ y__ -> x__{_FileOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "ccEnableArenas"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'ccEnableArenas
(\ x__ y__ -> x__{_FileOptions'ccEnableArenas = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' FileOptions "maybe'ccEnableArenas"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'ccEnableArenas
(\ x__ y__ -> x__{_FileOptions'ccEnableArenas = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "objcClassPrefix"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'objcClassPrefix
(\ x__ y__ -> x__{_FileOptions'objcClassPrefix = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'objcClassPrefix"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'objcClassPrefix
(\ x__ y__ -> x__{_FileOptions'objcClassPrefix = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "csharpNamespace"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'csharpNamespace
(\ x__ y__ -> x__{_FileOptions'csharpNamespace = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'csharpNamespace"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'csharpNamespace
(\ x__ y__ -> x__{_FileOptions'csharpNamespace = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "swiftPrefix"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'swiftPrefix
(\ x__ y__ -> x__{_FileOptions'swiftPrefix = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'swiftPrefix"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'swiftPrefix
(\ x__ y__ -> x__{_FileOptions'swiftPrefix = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "phpClassPrefix"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpClassPrefix
(\ x__ y__ -> x__{_FileOptions'phpClassPrefix = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'phpClassPrefix"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpClassPrefix
(\ x__ y__ -> x__{_FileOptions'phpClassPrefix = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "phpNamespace"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpNamespace
(\ x__ y__ -> x__{_FileOptions'phpNamespace = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'phpNamespace"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpNamespace
(\ x__ y__ -> x__{_FileOptions'phpNamespace = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "phpMetadataNamespace"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpMetadataNamespace
(\ x__ y__ -> x__{_FileOptions'phpMetadataNamespace = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions
"maybe'phpMetadataNamespace"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'phpMetadataNamespace
(\ x__ y__ -> x__{_FileOptions'phpMetadataNamespace = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "rubyPackage"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'rubyPackage
(\ x__ y__ -> x__{_FileOptions'rubyPackage = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' FileOptions "maybe'rubyPackage"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'rubyPackage
(\ x__ y__ -> x__{_FileOptions'rubyPackage = y__}))
Prelude.id
instance Lens.Labels.HasLens' FileOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _FileOptions'uninterpretedOption
(\ x__ y__ -> x__{_FileOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message FileOptions where
messageName _ = Data.Text.pack "google.protobuf.FileOptions"
fieldsByTag
= let javaPackage__field_descriptor
= Data.ProtoLens.FieldDescriptor "java_package"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'javaPackage")))
:: Data.ProtoLens.FieldDescriptor FileOptions
javaOuterClassname__field_descriptor
= Data.ProtoLens.FieldDescriptor "java_outer_classname"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'javaOuterClassname")))
:: Data.ProtoLens.FieldDescriptor FileOptions
javaMultipleFiles__field_descriptor
= Data.ProtoLens.FieldDescriptor "java_multiple_files"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'javaMultipleFiles")))
:: Data.ProtoLens.FieldDescriptor FileOptions
javaGenerateEqualsAndHash__field_descriptor
= Data.ProtoLens.FieldDescriptor "java_generate_equals_and_hash"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'javaGenerateEqualsAndHash")))
:: Data.ProtoLens.FieldDescriptor FileOptions
javaStringCheckUtf8__field_descriptor
= Data.ProtoLens.FieldDescriptor "java_string_check_utf8"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'javaStringCheckUtf8")))
:: Data.ProtoLens.FieldDescriptor FileOptions
optimizeFor__field_descriptor
= Data.ProtoLens.FieldDescriptor "optimize_for"
(Data.ProtoLens.ScalarField Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor FileOptions'OptimizeMode)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'optimizeFor")))
:: Data.ProtoLens.FieldDescriptor FileOptions
goPackage__field_descriptor
= Data.ProtoLens.FieldDescriptor "go_package"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'goPackage")))
:: Data.ProtoLens.FieldDescriptor FileOptions
ccGenericServices__field_descriptor
= Data.ProtoLens.FieldDescriptor "cc_generic_services"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'ccGenericServices")))
:: Data.ProtoLens.FieldDescriptor FileOptions
javaGenericServices__field_descriptor
= Data.ProtoLens.FieldDescriptor "java_generic_services"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'javaGenericServices")))
:: Data.ProtoLens.FieldDescriptor FileOptions
pyGenericServices__field_descriptor
= Data.ProtoLens.FieldDescriptor "py_generic_services"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'pyGenericServices")))
:: Data.ProtoLens.FieldDescriptor FileOptions
phpGenericServices__field_descriptor
= Data.ProtoLens.FieldDescriptor "php_generic_services"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'phpGenericServices")))
:: Data.ProtoLens.FieldDescriptor FileOptions
deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor FileOptions
ccEnableArenas__field_descriptor
= Data.ProtoLens.FieldDescriptor "cc_enable_arenas"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'ccEnableArenas")))
:: Data.ProtoLens.FieldDescriptor FileOptions
objcClassPrefix__field_descriptor
= Data.ProtoLens.FieldDescriptor "objc_class_prefix"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'objcClassPrefix")))
:: Data.ProtoLens.FieldDescriptor FileOptions
csharpNamespace__field_descriptor
= Data.ProtoLens.FieldDescriptor "csharp_namespace"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'csharpNamespace")))
:: Data.ProtoLens.FieldDescriptor FileOptions
swiftPrefix__field_descriptor
= Data.ProtoLens.FieldDescriptor "swift_prefix"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'swiftPrefix")))
:: Data.ProtoLens.FieldDescriptor FileOptions
phpClassPrefix__field_descriptor
= Data.ProtoLens.FieldDescriptor "php_class_prefix"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'phpClassPrefix")))
:: Data.ProtoLens.FieldDescriptor FileOptions
phpNamespace__field_descriptor
= Data.ProtoLens.FieldDescriptor "php_namespace"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'phpNamespace")))
:: Data.ProtoLens.FieldDescriptor FileOptions
phpMetadataNamespace__field_descriptor
= Data.ProtoLens.FieldDescriptor "php_metadata_namespace"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'phpMetadataNamespace")))
:: Data.ProtoLens.FieldDescriptor FileOptions
rubyPackage__field_descriptor
= Data.ProtoLens.FieldDescriptor "ruby_package"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'rubyPackage")))
:: Data.ProtoLens.FieldDescriptor FileOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor FileOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, javaPackage__field_descriptor),
(Data.ProtoLens.Tag 8, javaOuterClassname__field_descriptor),
(Data.ProtoLens.Tag 10, javaMultipleFiles__field_descriptor),
(Data.ProtoLens.Tag 20,
javaGenerateEqualsAndHash__field_descriptor),
(Data.ProtoLens.Tag 27, javaStringCheckUtf8__field_descriptor),
(Data.ProtoLens.Tag 9, optimizeFor__field_descriptor),
(Data.ProtoLens.Tag 11, goPackage__field_descriptor),
(Data.ProtoLens.Tag 16, ccGenericServices__field_descriptor),
(Data.ProtoLens.Tag 17, javaGenericServices__field_descriptor),
(Data.ProtoLens.Tag 18, pyGenericServices__field_descriptor),
(Data.ProtoLens.Tag 42, phpGenericServices__field_descriptor),
(Data.ProtoLens.Tag 23, deprecated__field_descriptor),
(Data.ProtoLens.Tag 31, ccEnableArenas__field_descriptor),
(Data.ProtoLens.Tag 36, objcClassPrefix__field_descriptor),
(Data.ProtoLens.Tag 37, csharpNamespace__field_descriptor),
(Data.ProtoLens.Tag 39, swiftPrefix__field_descriptor),
(Data.ProtoLens.Tag 40, phpClassPrefix__field_descriptor),
(Data.ProtoLens.Tag 41, phpNamespace__field_descriptor),
(Data.ProtoLens.Tag 44, phpMetadataNamespace__field_descriptor),
(Data.ProtoLens.Tag 45, rubyPackage__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _FileOptions'_unknownFields
(\ x__ y__ -> x__{_FileOptions'_unknownFields = y__})
defMessage
= FileOptions{_FileOptions'javaPackage = Prelude.Nothing,
_FileOptions'javaOuterClassname = Prelude.Nothing,
_FileOptions'javaMultipleFiles = Prelude.Nothing,
_FileOptions'javaGenerateEqualsAndHash = Prelude.Nothing,
_FileOptions'javaStringCheckUtf8 = Prelude.Nothing,
_FileOptions'optimizeFor = Prelude.Nothing,
_FileOptions'goPackage = Prelude.Nothing,
_FileOptions'ccGenericServices = Prelude.Nothing,
_FileOptions'javaGenericServices = Prelude.Nothing,
_FileOptions'pyGenericServices = Prelude.Nothing,
_FileOptions'phpGenericServices = Prelude.Nothing,
_FileOptions'deprecated = Prelude.Nothing,
_FileOptions'ccEnableArenas = Prelude.Nothing,
_FileOptions'objcClassPrefix = Prelude.Nothing,
_FileOptions'csharpNamespace = Prelude.Nothing,
_FileOptions'swiftPrefix = Prelude.Nothing,
_FileOptions'phpClassPrefix = Prelude.Nothing,
_FileOptions'phpNamespace = Prelude.Nothing,
_FileOptions'phpMetadataNamespace = Prelude.Nothing,
_FileOptions'rubyPackage = Prelude.Nothing,
_FileOptions'uninterpretedOption = [],
_FileOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData FileOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_FileOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_FileOptions'javaPackage x__)
(Control.DeepSeq.deepseq (_FileOptions'javaOuterClassname x__)
(Control.DeepSeq.deepseq (_FileOptions'javaMultipleFiles x__)
(Control.DeepSeq.deepseq
(_FileOptions'javaGenerateEqualsAndHash x__)
(Control.DeepSeq.deepseq (_FileOptions'javaStringCheckUtf8 x__)
(Control.DeepSeq.deepseq (_FileOptions'optimizeFor x__)
(Control.DeepSeq.deepseq (_FileOptions'goPackage x__)
(Control.DeepSeq.deepseq (_FileOptions'ccGenericServices x__)
(Control.DeepSeq.deepseq
(_FileOptions'javaGenericServices x__)
(Control.DeepSeq.deepseq
(_FileOptions'pyGenericServices x__)
(Control.DeepSeq.deepseq
(_FileOptions'phpGenericServices x__)
(Control.DeepSeq.deepseq
(_FileOptions'deprecated x__)
(Control.DeepSeq.deepseq
(_FileOptions'ccEnableArenas x__)
(Control.DeepSeq.deepseq
(_FileOptions'objcClassPrefix x__)
(Control.DeepSeq.deepseq
(_FileOptions'csharpNamespace x__)
(Control.DeepSeq.deepseq
(_FileOptions'swiftPrefix x__)
(Control.DeepSeq.deepseq
(_FileOptions'phpClassPrefix x__)
(Control.DeepSeq.deepseq
(_FileOptions'phpNamespace
x__)
(Control.DeepSeq.deepseq
(_FileOptions'phpMetadataNamespace
x__)
(Control.DeepSeq.deepseq
(_FileOptions'rubyPackage
x__)
(Control.DeepSeq.deepseq
(_FileOptions'uninterpretedOption
x__)
(()))))))))))))))))))))))
data FileOptions'OptimizeMode = FileOptions'SPEED
| FileOptions'CODE_SIZE
| FileOptions'LITE_RUNTIME
deriving (Prelude.Show, Prelude.Eq, Prelude.Ord)
instance Data.ProtoLens.FieldDefault FileOptions'OptimizeMode where
fieldDefault = FileOptions'SPEED
instance Data.ProtoLens.MessageEnum FileOptions'OptimizeMode where
maybeToEnum 1 = Prelude.Just FileOptions'SPEED
maybeToEnum 2 = Prelude.Just FileOptions'CODE_SIZE
maybeToEnum 3 = Prelude.Just FileOptions'LITE_RUNTIME
maybeToEnum _ = Prelude.Nothing
showEnum FileOptions'SPEED = "SPEED"
showEnum FileOptions'CODE_SIZE = "CODE_SIZE"
showEnum FileOptions'LITE_RUNTIME = "LITE_RUNTIME"
readEnum "SPEED" = Prelude.Just FileOptions'SPEED
readEnum "CODE_SIZE" = Prelude.Just FileOptions'CODE_SIZE
readEnum "LITE_RUNTIME" = Prelude.Just FileOptions'LITE_RUNTIME
readEnum _ = Prelude.Nothing
instance Prelude.Enum FileOptions'OptimizeMode where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum OptimizeMode: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum FileOptions'SPEED = 1
fromEnum FileOptions'CODE_SIZE = 2
fromEnum FileOptions'LITE_RUNTIME = 3
succ FileOptions'LITE_RUNTIME
= Prelude.error
"FileOptions'OptimizeMode.succ: bad argument FileOptions'LITE_RUNTIME. This value would be out of bounds."
succ FileOptions'SPEED = FileOptions'CODE_SIZE
succ FileOptions'CODE_SIZE = FileOptions'LITE_RUNTIME
pred FileOptions'SPEED
= Prelude.error
"FileOptions'OptimizeMode.pred: bad argument FileOptions'SPEED. This value would be out of bounds."
pred FileOptions'CODE_SIZE = FileOptions'SPEED
pred FileOptions'LITE_RUNTIME = FileOptions'CODE_SIZE
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded FileOptions'OptimizeMode where
minBound = FileOptions'SPEED
maxBound = FileOptions'LITE_RUNTIME
instance Control.DeepSeq.NFData FileOptions'OptimizeMode where
rnf x__ = Prelude.seq x__ (())
data GeneratedCodeInfo = GeneratedCodeInfo{_GeneratedCodeInfo'annotation
:: ![GeneratedCodeInfo'Annotation],
_GeneratedCodeInfo'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show GeneratedCodeInfo where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' GeneratedCodeInfo "annotation"
([GeneratedCodeInfo'Annotation])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _GeneratedCodeInfo'annotation
(\ x__ y__ -> x__{_GeneratedCodeInfo'annotation = y__}))
Prelude.id
instance Data.ProtoLens.Message GeneratedCodeInfo where
messageName _ = Data.Text.pack "google.protobuf.GeneratedCodeInfo"
fieldsByTag
= let annotation__field_descriptor
= Data.ProtoLens.FieldDescriptor "annotation"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor GeneratedCodeInfo'Annotation)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "annotation")))
:: Data.ProtoLens.FieldDescriptor GeneratedCodeInfo
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, annotation__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _GeneratedCodeInfo'_unknownFields
(\ x__ y__ -> x__{_GeneratedCodeInfo'_unknownFields = y__})
defMessage
= GeneratedCodeInfo{_GeneratedCodeInfo'annotation = [],
_GeneratedCodeInfo'_unknownFields = ([])}
instance Control.DeepSeq.NFData GeneratedCodeInfo where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_GeneratedCodeInfo'_unknownFields x__)
(Control.DeepSeq.deepseq (_GeneratedCodeInfo'annotation x__) (()))
data GeneratedCodeInfo'Annotation = GeneratedCodeInfo'Annotation{_GeneratedCodeInfo'Annotation'path
:: ![Data.Int.Int32],
_GeneratedCodeInfo'Annotation'sourceFile
:: !(Prelude.Maybe Data.Text.Text),
_GeneratedCodeInfo'Annotation'begin
:: !(Prelude.Maybe Data.Int.Int32),
_GeneratedCodeInfo'Annotation'end
:: !(Prelude.Maybe Data.Int.Int32),
_GeneratedCodeInfo'Annotation'_unknownFields
:: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show GeneratedCodeInfo'Annotation where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation "path"
([Data.Int.Int32])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _GeneratedCodeInfo'Annotation'path
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'path = y__}))
Prelude.id
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation
"sourceFile"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_GeneratedCodeInfo'Annotation'sourceFile
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'sourceFile = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation
"maybe'sourceFile"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_GeneratedCodeInfo'Annotation'sourceFile
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'sourceFile = y__}))
Prelude.id
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation "begin"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _GeneratedCodeInfo'Annotation'begin
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'begin = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation
"maybe'begin"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _GeneratedCodeInfo'Annotation'begin
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'begin = y__}))
Prelude.id
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation "end"
(Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _GeneratedCodeInfo'Annotation'end
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'end = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' GeneratedCodeInfo'Annotation
"maybe'end"
(Prelude.Maybe Data.Int.Int32)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _GeneratedCodeInfo'Annotation'end
(\ x__ y__ -> x__{_GeneratedCodeInfo'Annotation'end = y__}))
Prelude.id
instance Data.ProtoLens.Message GeneratedCodeInfo'Annotation where
messageName _
= Data.Text.pack "google.protobuf.GeneratedCodeInfo.Annotation"
fieldsByTag
= let path__field_descriptor
= Data.ProtoLens.FieldDescriptor "path"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Packed
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "path")))
:: Data.ProtoLens.FieldDescriptor GeneratedCodeInfo'Annotation
sourceFile__field_descriptor
= Data.ProtoLens.FieldDescriptor "source_file"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'sourceFile")))
:: Data.ProtoLens.FieldDescriptor GeneratedCodeInfo'Annotation
begin__field_descriptor
= Data.ProtoLens.FieldDescriptor "begin"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'begin")))
:: Data.ProtoLens.FieldDescriptor GeneratedCodeInfo'Annotation
end__field_descriptor
= Data.ProtoLens.FieldDescriptor "end"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'end")))
:: Data.ProtoLens.FieldDescriptor GeneratedCodeInfo'Annotation
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, path__field_descriptor),
(Data.ProtoLens.Tag 2, sourceFile__field_descriptor),
(Data.ProtoLens.Tag 3, begin__field_descriptor),
(Data.ProtoLens.Tag 4, end__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_GeneratedCodeInfo'Annotation'_unknownFields
(\ x__ y__ ->
x__{_GeneratedCodeInfo'Annotation'_unknownFields = y__})
defMessage
= GeneratedCodeInfo'Annotation{_GeneratedCodeInfo'Annotation'path =
[],
_GeneratedCodeInfo'Annotation'sourceFile = Prelude.Nothing,
_GeneratedCodeInfo'Annotation'begin = Prelude.Nothing,
_GeneratedCodeInfo'Annotation'end = Prelude.Nothing,
_GeneratedCodeInfo'Annotation'_unknownFields = ([])}
instance Control.DeepSeq.NFData GeneratedCodeInfo'Annotation where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_GeneratedCodeInfo'Annotation'_unknownFields x__)
(Control.DeepSeq.deepseq (_GeneratedCodeInfo'Annotation'path x__)
(Control.DeepSeq.deepseq
(_GeneratedCodeInfo'Annotation'sourceFile x__)
(Control.DeepSeq.deepseq (_GeneratedCodeInfo'Annotation'begin x__)
(Control.DeepSeq.deepseq (_GeneratedCodeInfo'Annotation'end x__)
(())))))
data MessageOptions = MessageOptions{_MessageOptions'messageSetWireFormat
:: !(Prelude.Maybe Prelude.Bool),
_MessageOptions'noStandardDescriptorAccessor ::
!(Prelude.Maybe Prelude.Bool),
_MessageOptions'deprecated :: !(Prelude.Maybe Prelude.Bool),
_MessageOptions'mapEntry :: !(Prelude.Maybe Prelude.Bool),
_MessageOptions'uninterpretedOption :: ![UninterpretedOption],
_MessageOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show MessageOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' MessageOptions "messageSetWireFormat"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'messageSetWireFormat
(\ x__ y__ -> x__{_MessageOptions'messageSetWireFormat = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' MessageOptions
"maybe'messageSetWireFormat"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'messageSetWireFormat
(\ x__ y__ -> x__{_MessageOptions'messageSetWireFormat = y__}))
Prelude.id
instance Lens.Labels.HasLens' MessageOptions
"noStandardDescriptorAccessor"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_MessageOptions'noStandardDescriptorAccessor
(\ x__ y__ ->
x__{_MessageOptions'noStandardDescriptorAccessor = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' MessageOptions
"maybe'noStandardDescriptorAccessor"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_MessageOptions'noStandardDescriptorAccessor
(\ x__ y__ ->
x__{_MessageOptions'noStandardDescriptorAccessor = y__}))
Prelude.id
instance Lens.Labels.HasLens' MessageOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'deprecated
(\ x__ y__ -> x__{_MessageOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' MessageOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'deprecated
(\ x__ y__ -> x__{_MessageOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' MessageOptions "mapEntry"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'mapEntry
(\ x__ y__ -> x__{_MessageOptions'mapEntry = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' MessageOptions "maybe'mapEntry"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'mapEntry
(\ x__ y__ -> x__{_MessageOptions'mapEntry = y__}))
Prelude.id
instance Lens.Labels.HasLens' MessageOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MessageOptions'uninterpretedOption
(\ x__ y__ -> x__{_MessageOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message MessageOptions where
messageName _ = Data.Text.pack "google.protobuf.MessageOptions"
fieldsByTag
= let messageSetWireFormat__field_descriptor
= Data.ProtoLens.FieldDescriptor "message_set_wire_format"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'messageSetWireFormat")))
:: Data.ProtoLens.FieldDescriptor MessageOptions
noStandardDescriptorAccessor__field_descriptor
= Data.ProtoLens.FieldDescriptor "no_standard_descriptor_accessor"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'noStandardDescriptorAccessor")))
:: Data.ProtoLens.FieldDescriptor MessageOptions
deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor MessageOptions
mapEntry__field_descriptor
= Data.ProtoLens.FieldDescriptor "map_entry"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'mapEntry")))
:: Data.ProtoLens.FieldDescriptor MessageOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor MessageOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, messageSetWireFormat__field_descriptor),
(Data.ProtoLens.Tag 2,
noStandardDescriptorAccessor__field_descriptor),
(Data.ProtoLens.Tag 3, deprecated__field_descriptor),
(Data.ProtoLens.Tag 7, mapEntry__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _MessageOptions'_unknownFields
(\ x__ y__ -> x__{_MessageOptions'_unknownFields = y__})
defMessage
= MessageOptions{_MessageOptions'messageSetWireFormat =
Prelude.Nothing,
_MessageOptions'noStandardDescriptorAccessor = Prelude.Nothing,
_MessageOptions'deprecated = Prelude.Nothing,
_MessageOptions'mapEntry = Prelude.Nothing,
_MessageOptions'uninterpretedOption = [],
_MessageOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData MessageOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_MessageOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_MessageOptions'messageSetWireFormat x__)
(Control.DeepSeq.deepseq
(_MessageOptions'noStandardDescriptorAccessor x__)
(Control.DeepSeq.deepseq (_MessageOptions'deprecated x__)
(Control.DeepSeq.deepseq (_MessageOptions'mapEntry x__)
(Control.DeepSeq.deepseq (_MessageOptions'uninterpretedOption x__)
(()))))))
data MethodDescriptorProto = MethodDescriptorProto{_MethodDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_MethodDescriptorProto'inputType ::
!(Prelude.Maybe Data.Text.Text),
_MethodDescriptorProto'outputType ::
!(Prelude.Maybe Data.Text.Text),
_MethodDescriptorProto'options ::
!(Prelude.Maybe MethodOptions),
_MethodDescriptorProto'clientStreaming ::
!(Prelude.Maybe Prelude.Bool),
_MethodDescriptorProto'serverStreaming ::
!(Prelude.Maybe Prelude.Bool),
_MethodDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show MethodDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' MethodDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'name
(\ x__ y__ -> x__{_MethodDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' MethodDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'name
(\ x__ y__ -> x__{_MethodDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodDescriptorProto "inputType"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'inputType
(\ x__ y__ -> x__{_MethodDescriptorProto'inputType = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' MethodDescriptorProto
"maybe'inputType"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'inputType
(\ x__ y__ -> x__{_MethodDescriptorProto'inputType = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodDescriptorProto "outputType"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'outputType
(\ x__ y__ -> x__{_MethodDescriptorProto'outputType = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' MethodDescriptorProto
"maybe'outputType"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'outputType
(\ x__ y__ -> x__{_MethodDescriptorProto'outputType = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodDescriptorProto "options"
(MethodOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'options
(\ x__ y__ -> x__{_MethodDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' MethodDescriptorProto "maybe'options"
(Prelude.Maybe MethodOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'options
(\ x__ y__ -> x__{_MethodDescriptorProto'options = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodDescriptorProto
"clientStreaming"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'clientStreaming
(\ x__ y__ -> x__{_MethodDescriptorProto'clientStreaming = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' MethodDescriptorProto
"maybe'clientStreaming"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'clientStreaming
(\ x__ y__ -> x__{_MethodDescriptorProto'clientStreaming = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodDescriptorProto
"serverStreaming"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'serverStreaming
(\ x__ y__ -> x__{_MethodDescriptorProto'serverStreaming = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' MethodDescriptorProto
"maybe'serverStreaming"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodDescriptorProto'serverStreaming
(\ x__ y__ -> x__{_MethodDescriptorProto'serverStreaming = y__}))
Prelude.id
instance Data.ProtoLens.Message MethodDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.MethodDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor MethodDescriptorProto
inputType__field_descriptor
= Data.ProtoLens.FieldDescriptor "input_type"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'inputType")))
:: Data.ProtoLens.FieldDescriptor MethodDescriptorProto
outputType__field_descriptor
= Data.ProtoLens.FieldDescriptor "output_type"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'outputType")))
:: Data.ProtoLens.FieldDescriptor MethodDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor MethodOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor MethodDescriptorProto
clientStreaming__field_descriptor
= Data.ProtoLens.FieldDescriptor "client_streaming"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'clientStreaming")))
:: Data.ProtoLens.FieldDescriptor MethodDescriptorProto
serverStreaming__field_descriptor
= Data.ProtoLens.FieldDescriptor "server_streaming"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'serverStreaming")))
:: Data.ProtoLens.FieldDescriptor MethodDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, inputType__field_descriptor),
(Data.ProtoLens.Tag 3, outputType__field_descriptor),
(Data.ProtoLens.Tag 4, options__field_descriptor),
(Data.ProtoLens.Tag 5, clientStreaming__field_descriptor),
(Data.ProtoLens.Tag 6, serverStreaming__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _MethodDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_MethodDescriptorProto'_unknownFields = y__})
defMessage
= MethodDescriptorProto{_MethodDescriptorProto'name =
Prelude.Nothing,
_MethodDescriptorProto'inputType = Prelude.Nothing,
_MethodDescriptorProto'outputType = Prelude.Nothing,
_MethodDescriptorProto'options = Prelude.Nothing,
_MethodDescriptorProto'clientStreaming = Prelude.Nothing,
_MethodDescriptorProto'serverStreaming = Prelude.Nothing,
_MethodDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData MethodDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_MethodDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_MethodDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_MethodDescriptorProto'inputType x__)
(Control.DeepSeq.deepseq (_MethodDescriptorProto'outputType x__)
(Control.DeepSeq.deepseq (_MethodDescriptorProto'options x__)
(Control.DeepSeq.deepseq
(_MethodDescriptorProto'clientStreaming x__)
(Control.DeepSeq.deepseq
(_MethodDescriptorProto'serverStreaming x__)
(())))))))
data MethodOptions = MethodOptions{_MethodOptions'deprecated ::
!(Prelude.Maybe Prelude.Bool),
_MethodOptions'idempotencyLevel ::
!(Prelude.Maybe MethodOptions'IdempotencyLevel),
_MethodOptions'uninterpretedOption :: ![UninterpretedOption],
_MethodOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show MethodOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' MethodOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodOptions'deprecated
(\ x__ y__ -> x__{_MethodOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' MethodOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodOptions'deprecated
(\ x__ y__ -> x__{_MethodOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodOptions "idempotencyLevel"
(MethodOptions'IdempotencyLevel)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodOptions'idempotencyLevel
(\ x__ y__ -> x__{_MethodOptions'idempotencyLevel = y__}))
(Data.ProtoLens.maybeLens MethodOptions'IDEMPOTENCY_UNKNOWN)
instance Lens.Labels.HasLens' MethodOptions
"maybe'idempotencyLevel"
(Prelude.Maybe MethodOptions'IdempotencyLevel)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodOptions'idempotencyLevel
(\ x__ y__ -> x__{_MethodOptions'idempotencyLevel = y__}))
Prelude.id
instance Lens.Labels.HasLens' MethodOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _MethodOptions'uninterpretedOption
(\ x__ y__ -> x__{_MethodOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message MethodOptions where
messageName _ = Data.Text.pack "google.protobuf.MethodOptions"
fieldsByTag
= let deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor MethodOptions
idempotencyLevel__field_descriptor
= Data.ProtoLens.FieldDescriptor "idempotency_level"
(Data.ProtoLens.ScalarField Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor MethodOptions'IdempotencyLevel)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'idempotencyLevel")))
:: Data.ProtoLens.FieldDescriptor MethodOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor MethodOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 33, deprecated__field_descriptor),
(Data.ProtoLens.Tag 34, idempotencyLevel__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _MethodOptions'_unknownFields
(\ x__ y__ -> x__{_MethodOptions'_unknownFields = y__})
defMessage
= MethodOptions{_MethodOptions'deprecated = Prelude.Nothing,
_MethodOptions'idempotencyLevel = Prelude.Nothing,
_MethodOptions'uninterpretedOption = [],
_MethodOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData MethodOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_MethodOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_MethodOptions'deprecated x__)
(Control.DeepSeq.deepseq (_MethodOptions'idempotencyLevel x__)
(Control.DeepSeq.deepseq (_MethodOptions'uninterpretedOption x__)
(()))))
data MethodOptions'IdempotencyLevel = MethodOptions'IDEMPOTENCY_UNKNOWN
| MethodOptions'NO_SIDE_EFFECTS
| MethodOptions'IDEMPOTENT
deriving (Prelude.Show, Prelude.Eq, Prelude.Ord)
instance Data.ProtoLens.FieldDefault MethodOptions'IdempotencyLevel
where
fieldDefault = MethodOptions'IDEMPOTENCY_UNKNOWN
instance Data.ProtoLens.MessageEnum MethodOptions'IdempotencyLevel
where
maybeToEnum 0 = Prelude.Just MethodOptions'IDEMPOTENCY_UNKNOWN
maybeToEnum 1 = Prelude.Just MethodOptions'NO_SIDE_EFFECTS
maybeToEnum 2 = Prelude.Just MethodOptions'IDEMPOTENT
maybeToEnum _ = Prelude.Nothing
showEnum MethodOptions'IDEMPOTENCY_UNKNOWN = "IDEMPOTENCY_UNKNOWN"
showEnum MethodOptions'NO_SIDE_EFFECTS = "NO_SIDE_EFFECTS"
showEnum MethodOptions'IDEMPOTENT = "IDEMPOTENT"
readEnum "IDEMPOTENCY_UNKNOWN"
= Prelude.Just MethodOptions'IDEMPOTENCY_UNKNOWN
readEnum "NO_SIDE_EFFECTS"
= Prelude.Just MethodOptions'NO_SIDE_EFFECTS
readEnum "IDEMPOTENT" = Prelude.Just MethodOptions'IDEMPOTENT
readEnum _ = Prelude.Nothing
instance Prelude.Enum MethodOptions'IdempotencyLevel where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum IdempotencyLevel: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum MethodOptions'IDEMPOTENCY_UNKNOWN = 0
fromEnum MethodOptions'NO_SIDE_EFFECTS = 1
fromEnum MethodOptions'IDEMPOTENT = 2
succ MethodOptions'IDEMPOTENT
= Prelude.error
"MethodOptions'IdempotencyLevel.succ: bad argument MethodOptions'IDEMPOTENT. This value would be out of bounds."
succ MethodOptions'IDEMPOTENCY_UNKNOWN
= MethodOptions'NO_SIDE_EFFECTS
succ MethodOptions'NO_SIDE_EFFECTS = MethodOptions'IDEMPOTENT
pred MethodOptions'IDEMPOTENCY_UNKNOWN
= Prelude.error
"MethodOptions'IdempotencyLevel.pred: bad argument MethodOptions'IDEMPOTENCY_UNKNOWN. This value would be out of bounds."
pred MethodOptions'NO_SIDE_EFFECTS
= MethodOptions'IDEMPOTENCY_UNKNOWN
pred MethodOptions'IDEMPOTENT = MethodOptions'NO_SIDE_EFFECTS
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded MethodOptions'IdempotencyLevel where
minBound = MethodOptions'IDEMPOTENCY_UNKNOWN
maxBound = MethodOptions'IDEMPOTENT
instance Control.DeepSeq.NFData MethodOptions'IdempotencyLevel
where
rnf x__ = Prelude.seq x__ (())
data OneofDescriptorProto = OneofDescriptorProto{_OneofDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_OneofDescriptorProto'options ::
!(Prelude.Maybe OneofOptions),
_OneofDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show OneofDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' OneofDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _OneofDescriptorProto'name
(\ x__ y__ -> x__{_OneofDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' OneofDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _OneofDescriptorProto'name
(\ x__ y__ -> x__{_OneofDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' OneofDescriptorProto "options"
(OneofOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _OneofDescriptorProto'options
(\ x__ y__ -> x__{_OneofDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' OneofDescriptorProto "maybe'options"
(Prelude.Maybe OneofOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _OneofDescriptorProto'options
(\ x__ y__ -> x__{_OneofDescriptorProto'options = y__}))
Prelude.id
instance Data.ProtoLens.Message OneofDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.OneofDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor OneofDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor OneofOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor OneofDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, options__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _OneofDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_OneofDescriptorProto'_unknownFields = y__})
defMessage
= OneofDescriptorProto{_OneofDescriptorProto'name =
Prelude.Nothing,
_OneofDescriptorProto'options = Prelude.Nothing,
_OneofDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData OneofDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_OneofDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_OneofDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_OneofDescriptorProto'options x__) (())))
data OneofOptions = OneofOptions{_OneofOptions'uninterpretedOption
:: ![UninterpretedOption],
_OneofOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show OneofOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' OneofOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _OneofOptions'uninterpretedOption
(\ x__ y__ -> x__{_OneofOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message OneofOptions where
messageName _ = Data.Text.pack "google.protobuf.OneofOptions"
fieldsByTag
= let uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor OneofOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _OneofOptions'_unknownFields
(\ x__ y__ -> x__{_OneofOptions'_unknownFields = y__})
defMessage
= OneofOptions{_OneofOptions'uninterpretedOption = [],
_OneofOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData OneofOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_OneofOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_OneofOptions'uninterpretedOption x__)
(()))
data ServiceDescriptorProto = ServiceDescriptorProto{_ServiceDescriptorProto'name
:: !(Prelude.Maybe Data.Text.Text),
_ServiceDescriptorProto'method ::
![MethodDescriptorProto],
_ServiceDescriptorProto'options ::
!(Prelude.Maybe ServiceOptions),
_ServiceDescriptorProto'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show ServiceDescriptorProto where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' ServiceDescriptorProto "name"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceDescriptorProto'name
(\ x__ y__ -> x__{_ServiceDescriptorProto'name = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' ServiceDescriptorProto "maybe'name"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceDescriptorProto'name
(\ x__ y__ -> x__{_ServiceDescriptorProto'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' ServiceDescriptorProto "method"
([MethodDescriptorProto])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceDescriptorProto'method
(\ x__ y__ -> x__{_ServiceDescriptorProto'method = y__}))
Prelude.id
instance Lens.Labels.HasLens' ServiceDescriptorProto "options"
(ServiceOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceDescriptorProto'options
(\ x__ y__ -> x__{_ServiceDescriptorProto'options = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.defMessage)
instance Lens.Labels.HasLens' ServiceDescriptorProto
"maybe'options"
(Prelude.Maybe ServiceOptions)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceDescriptorProto'options
(\ x__ y__ -> x__{_ServiceDescriptorProto'options = y__}))
Prelude.id
instance Data.ProtoLens.Message ServiceDescriptorProto where
messageName _
= Data.Text.pack "google.protobuf.ServiceDescriptorProto"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'name")))
:: Data.ProtoLens.FieldDescriptor ServiceDescriptorProto
method__field_descriptor
= Data.ProtoLens.FieldDescriptor "method"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor MethodDescriptorProto)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "method")))
:: Data.ProtoLens.FieldDescriptor ServiceDescriptorProto
options__field_descriptor
= Data.ProtoLens.FieldDescriptor "options"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ServiceOptions)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'options")))
:: Data.ProtoLens.FieldDescriptor ServiceDescriptorProto
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, name__field_descriptor),
(Data.ProtoLens.Tag 2, method__field_descriptor),
(Data.ProtoLens.Tag 3, options__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_ServiceDescriptorProto'_unknownFields
(\ x__ y__ -> x__{_ServiceDescriptorProto'_unknownFields = y__})
defMessage
= ServiceDescriptorProto{_ServiceDescriptorProto'name =
Prelude.Nothing,
_ServiceDescriptorProto'method = [],
_ServiceDescriptorProto'options = Prelude.Nothing,
_ServiceDescriptorProto'_unknownFields = ([])}
instance Control.DeepSeq.NFData ServiceDescriptorProto where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_ServiceDescriptorProto'_unknownFields x__)
(Control.DeepSeq.deepseq (_ServiceDescriptorProto'name x__)
(Control.DeepSeq.deepseq (_ServiceDescriptorProto'method x__)
(Control.DeepSeq.deepseq (_ServiceDescriptorProto'options x__)
(()))))
data ServiceOptions = ServiceOptions{_ServiceOptions'deprecated ::
!(Prelude.Maybe Prelude.Bool),
_ServiceOptions'uninterpretedOption :: ![UninterpretedOption],
_ServiceOptions'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show ServiceOptions where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' ServiceOptions "deprecated"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceOptions'deprecated
(\ x__ y__ -> x__{_ServiceOptions'deprecated = y__}))
(Data.ProtoLens.maybeLens Prelude.False)
instance Lens.Labels.HasLens' ServiceOptions "maybe'deprecated"
(Prelude.Maybe Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceOptions'deprecated
(\ x__ y__ -> x__{_ServiceOptions'deprecated = y__}))
Prelude.id
instance Lens.Labels.HasLens' ServiceOptions "uninterpretedOption"
([UninterpretedOption])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _ServiceOptions'uninterpretedOption
(\ x__ y__ -> x__{_ServiceOptions'uninterpretedOption = y__}))
Prelude.id
instance Data.ProtoLens.Message ServiceOptions where
messageName _ = Data.Text.pack "google.protobuf.ServiceOptions"
fieldsByTag
= let deprecated__field_descriptor
= Data.ProtoLens.FieldDescriptor "deprecated"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "maybe'deprecated")))
:: Data.ProtoLens.FieldDescriptor ServiceOptions
uninterpretedOption__field_descriptor
= Data.ProtoLens.FieldDescriptor "uninterpreted_option"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "uninterpretedOption")))
:: Data.ProtoLens.FieldDescriptor ServiceOptions
in
Data.Map.fromList
[(Data.ProtoLens.Tag 33, deprecated__field_descriptor),
(Data.ProtoLens.Tag 999, uninterpretedOption__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _ServiceOptions'_unknownFields
(\ x__ y__ -> x__{_ServiceOptions'_unknownFields = y__})
defMessage
= ServiceOptions{_ServiceOptions'deprecated = Prelude.Nothing,
_ServiceOptions'uninterpretedOption = [],
_ServiceOptions'_unknownFields = ([])}
instance Control.DeepSeq.NFData ServiceOptions where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_ServiceOptions'_unknownFields x__)
(Control.DeepSeq.deepseq (_ServiceOptions'deprecated x__)
(Control.DeepSeq.deepseq (_ServiceOptions'uninterpretedOption x__)
(())))
data SourceCodeInfo = SourceCodeInfo{_SourceCodeInfo'location ::
![SourceCodeInfo'Location],
_SourceCodeInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show SourceCodeInfo where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' SourceCodeInfo "location"
([SourceCodeInfo'Location])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _SourceCodeInfo'location
(\ x__ y__ -> x__{_SourceCodeInfo'location = y__}))
Prelude.id
instance Data.ProtoLens.Message SourceCodeInfo where
messageName _ = Data.Text.pack "google.protobuf.SourceCodeInfo"
fieldsByTag
= let location__field_descriptor
= Data.ProtoLens.FieldDescriptor "location"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor SourceCodeInfo'Location)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "location")))
:: Data.ProtoLens.FieldDescriptor SourceCodeInfo
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, location__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _SourceCodeInfo'_unknownFields
(\ x__ y__ -> x__{_SourceCodeInfo'_unknownFields = y__})
defMessage
= SourceCodeInfo{_SourceCodeInfo'location = [],
_SourceCodeInfo'_unknownFields = ([])}
instance Control.DeepSeq.NFData SourceCodeInfo where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_SourceCodeInfo'_unknownFields x__)
(Control.DeepSeq.deepseq (_SourceCodeInfo'location x__) (()))
data SourceCodeInfo'Location = SourceCodeInfo'Location{_SourceCodeInfo'Location'path
:: ![Data.Int.Int32],
_SourceCodeInfo'Location'span ::
![Data.Int.Int32],
_SourceCodeInfo'Location'leadingComments ::
!(Prelude.Maybe Data.Text.Text),
_SourceCodeInfo'Location'trailingComments ::
!(Prelude.Maybe Data.Text.Text),
_SourceCodeInfo'Location'leadingDetachedComments
:: ![Data.Text.Text],
_SourceCodeInfo'Location'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show SourceCodeInfo'Location where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' SourceCodeInfo'Location "path"
([Data.Int.Int32])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _SourceCodeInfo'Location'path
(\ x__ y__ -> x__{_SourceCodeInfo'Location'path = y__}))
Prelude.id
instance Lens.Labels.HasLens' SourceCodeInfo'Location "span"
([Data.Int.Int32])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _SourceCodeInfo'Location'span
(\ x__ y__ -> x__{_SourceCodeInfo'Location'span = y__}))
Prelude.id
instance Lens.Labels.HasLens' SourceCodeInfo'Location
"leadingComments"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SourceCodeInfo'Location'leadingComments
(\ x__ y__ -> x__{_SourceCodeInfo'Location'leadingComments = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' SourceCodeInfo'Location
"maybe'leadingComments"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SourceCodeInfo'Location'leadingComments
(\ x__ y__ -> x__{_SourceCodeInfo'Location'leadingComments = y__}))
Prelude.id
instance Lens.Labels.HasLens' SourceCodeInfo'Location
"trailingComments"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SourceCodeInfo'Location'trailingComments
(\ x__ y__ ->
x__{_SourceCodeInfo'Location'trailingComments = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' SourceCodeInfo'Location
"maybe'trailingComments"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SourceCodeInfo'Location'trailingComments
(\ x__ y__ ->
x__{_SourceCodeInfo'Location'trailingComments = y__}))
Prelude.id
instance Lens.Labels.HasLens' SourceCodeInfo'Location
"leadingDetachedComments"
([Data.Text.Text])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_SourceCodeInfo'Location'leadingDetachedComments
(\ x__ y__ ->
x__{_SourceCodeInfo'Location'leadingDetachedComments = y__}))
Prelude.id
instance Data.ProtoLens.Message SourceCodeInfo'Location where
messageName _
= Data.Text.pack "google.protobuf.SourceCodeInfo.Location"
fieldsByTag
= let path__field_descriptor
= Data.ProtoLens.FieldDescriptor "path"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Packed
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "path")))
:: Data.ProtoLens.FieldDescriptor SourceCodeInfo'Location
span__field_descriptor
= Data.ProtoLens.FieldDescriptor "span"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Packed
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "span")))
:: Data.ProtoLens.FieldDescriptor SourceCodeInfo'Location
leadingComments__field_descriptor
= Data.ProtoLens.FieldDescriptor "leading_comments"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'leadingComments")))
:: Data.ProtoLens.FieldDescriptor SourceCodeInfo'Location
trailingComments__field_descriptor
= Data.ProtoLens.FieldDescriptor "trailing_comments"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'trailingComments")))
:: Data.ProtoLens.FieldDescriptor SourceCodeInfo'Location
leadingDetachedComments__field_descriptor
= Data.ProtoLens.FieldDescriptor "leading_detached_comments"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "leadingDetachedComments")))
:: Data.ProtoLens.FieldDescriptor SourceCodeInfo'Location
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, path__field_descriptor),
(Data.ProtoLens.Tag 2, span__field_descriptor),
(Data.ProtoLens.Tag 3, leadingComments__field_descriptor),
(Data.ProtoLens.Tag 4, trailingComments__field_descriptor),
(Data.ProtoLens.Tag 6, leadingDetachedComments__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_SourceCodeInfo'Location'_unknownFields
(\ x__ y__ -> x__{_SourceCodeInfo'Location'_unknownFields = y__})
defMessage
= SourceCodeInfo'Location{_SourceCodeInfo'Location'path = [],
_SourceCodeInfo'Location'span = [],
_SourceCodeInfo'Location'leadingComments = Prelude.Nothing,
_SourceCodeInfo'Location'trailingComments = Prelude.Nothing,
_SourceCodeInfo'Location'leadingDetachedComments = [],
_SourceCodeInfo'Location'_unknownFields = ([])}
instance Control.DeepSeq.NFData SourceCodeInfo'Location where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_SourceCodeInfo'Location'_unknownFields x__)
(Control.DeepSeq.deepseq (_SourceCodeInfo'Location'path x__)
(Control.DeepSeq.deepseq (_SourceCodeInfo'Location'span x__)
(Control.DeepSeq.deepseq
(_SourceCodeInfo'Location'leadingComments x__)
(Control.DeepSeq.deepseq
(_SourceCodeInfo'Location'trailingComments x__)
(Control.DeepSeq.deepseq
(_SourceCodeInfo'Location'leadingDetachedComments x__)
(()))))))
data UninterpretedOption = UninterpretedOption{_UninterpretedOption'name
:: ![UninterpretedOption'NamePart],
_UninterpretedOption'identifierValue ::
!(Prelude.Maybe Data.Text.Text),
_UninterpretedOption'positiveIntValue ::
!(Prelude.Maybe Data.Word.Word64),
_UninterpretedOption'negativeIntValue ::
!(Prelude.Maybe Data.Int.Int64),
_UninterpretedOption'doubleValue ::
!(Prelude.Maybe Prelude.Double),
_UninterpretedOption'stringValue ::
!(Prelude.Maybe Data.ByteString.ByteString),
_UninterpretedOption'aggregateValue ::
!(Prelude.Maybe Data.Text.Text),
_UninterpretedOption'_unknownFields ::
!Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show UninterpretedOption where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' UninterpretedOption "name"
([UninterpretedOption'NamePart])
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'name
(\ x__ y__ -> x__{_UninterpretedOption'name = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption "identifierValue"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'identifierValue
(\ x__ y__ -> x__{_UninterpretedOption'identifierValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' UninterpretedOption
"maybe'identifierValue"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'identifierValue
(\ x__ y__ -> x__{_UninterpretedOption'identifierValue = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption
"positiveIntValue"
(Data.Word.Word64)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'positiveIntValue
(\ x__ y__ -> x__{_UninterpretedOption'positiveIntValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' UninterpretedOption
"maybe'positiveIntValue"
(Prelude.Maybe Data.Word.Word64)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'positiveIntValue
(\ x__ y__ -> x__{_UninterpretedOption'positiveIntValue = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption
"negativeIntValue"
(Data.Int.Int64)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'negativeIntValue
(\ x__ y__ -> x__{_UninterpretedOption'negativeIntValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' UninterpretedOption
"maybe'negativeIntValue"
(Prelude.Maybe Data.Int.Int64)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'negativeIntValue
(\ x__ y__ -> x__{_UninterpretedOption'negativeIntValue = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption "doubleValue"
(Prelude.Double)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'doubleValue
(\ x__ y__ -> x__{_UninterpretedOption'doubleValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' UninterpretedOption
"maybe'doubleValue"
(Prelude.Maybe Prelude.Double)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'doubleValue
(\ x__ y__ -> x__{_UninterpretedOption'doubleValue = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption "stringValue"
(Data.ByteString.ByteString)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'stringValue
(\ x__ y__ -> x__{_UninterpretedOption'stringValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' UninterpretedOption
"maybe'stringValue"
(Prelude.Maybe Data.ByteString.ByteString)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'stringValue
(\ x__ y__ -> x__{_UninterpretedOption'stringValue = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption "aggregateValue"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'aggregateValue
(\ x__ y__ -> x__{_UninterpretedOption'aggregateValue = y__}))
(Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault)
instance Lens.Labels.HasLens' UninterpretedOption
"maybe'aggregateValue"
(Prelude.Maybe Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'aggregateValue
(\ x__ y__ -> x__{_UninterpretedOption'aggregateValue = y__}))
Prelude.id
instance Data.ProtoLens.Message UninterpretedOption where
messageName _
= Data.Text.pack "google.protobuf.UninterpretedOption"
fieldsByTag
= let name__field_descriptor
= Data.ProtoLens.FieldDescriptor "name"
(Data.ProtoLens.MessageField Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor UninterpretedOption'NamePart)
(Data.ProtoLens.RepeatedField Data.ProtoLens.Unpacked
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "name")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
identifierValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "identifier_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'identifierValue")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
positiveIntValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "positive_int_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'positiveIntValue")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
negativeIntValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "negative_int_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'negativeIntValue")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
doubleValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "double_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Double)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'doubleValue")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
stringValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "string_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.BytesField ::
Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'stringValue")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
aggregateValue__field_descriptor
= Data.ProtoLens.FieldDescriptor "aggregate_value"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.OptionalField
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) ::
(Lens.Labels.Proxy#) "maybe'aggregateValue")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption
in
Data.Map.fromList
[(Data.ProtoLens.Tag 2, name__field_descriptor),
(Data.ProtoLens.Tag 3, identifierValue__field_descriptor),
(Data.ProtoLens.Tag 4, positiveIntValue__field_descriptor),
(Data.ProtoLens.Tag 5, negativeIntValue__field_descriptor),
(Data.ProtoLens.Tag 6, doubleValue__field_descriptor),
(Data.ProtoLens.Tag 7, stringValue__field_descriptor),
(Data.ProtoLens.Tag 8, aggregateValue__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens _UninterpretedOption'_unknownFields
(\ x__ y__ -> x__{_UninterpretedOption'_unknownFields = y__})
defMessage
= UninterpretedOption{_UninterpretedOption'name = [],
_UninterpretedOption'identifierValue = Prelude.Nothing,
_UninterpretedOption'positiveIntValue = Prelude.Nothing,
_UninterpretedOption'negativeIntValue = Prelude.Nothing,
_UninterpretedOption'doubleValue = Prelude.Nothing,
_UninterpretedOption'stringValue = Prelude.Nothing,
_UninterpretedOption'aggregateValue = Prelude.Nothing,
_UninterpretedOption'_unknownFields = ([])}
instance Control.DeepSeq.NFData UninterpretedOption where
rnf
= \ x__ ->
Control.DeepSeq.deepseq (_UninterpretedOption'_unknownFields x__)
(Control.DeepSeq.deepseq (_UninterpretedOption'name x__)
(Control.DeepSeq.deepseq (_UninterpretedOption'identifierValue x__)
(Control.DeepSeq.deepseq
(_UninterpretedOption'positiveIntValue x__)
(Control.DeepSeq.deepseq
(_UninterpretedOption'negativeIntValue x__)
(Control.DeepSeq.deepseq (_UninterpretedOption'doubleValue x__)
(Control.DeepSeq.deepseq (_UninterpretedOption'stringValue x__)
(Control.DeepSeq.deepseq (_UninterpretedOption'aggregateValue x__)
(()))))))))
data UninterpretedOption'NamePart = UninterpretedOption'NamePart{_UninterpretedOption'NamePart'namePart
:: !Data.Text.Text,
_UninterpretedOption'NamePart'isExtension
:: !Prelude.Bool,
_UninterpretedOption'NamePart'_unknownFields
:: !Data.ProtoLens.FieldSet}
deriving (Prelude.Eq, Prelude.Ord)
instance Prelude.Show UninterpretedOption'NamePart where
showsPrec _ __x __s
= Prelude.showChar '{'
(Prelude.showString (Data.ProtoLens.showMessageShort __x)
(Prelude.showChar '}' __s))
instance Lens.Labels.HasLens' UninterpretedOption'NamePart
"namePart"
(Data.Text.Text)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens _UninterpretedOption'NamePart'namePart
(\ x__ y__ -> x__{_UninterpretedOption'NamePart'namePart = y__}))
Prelude.id
instance Lens.Labels.HasLens' UninterpretedOption'NamePart
"isExtension"
(Prelude.Bool)
where
lensOf' _
= (Prelude..)
(Lens.Family2.Unchecked.lens
_UninterpretedOption'NamePart'isExtension
(\ x__ y__ ->
x__{_UninterpretedOption'NamePart'isExtension = y__}))
Prelude.id
instance Data.ProtoLens.Message UninterpretedOption'NamePart where
messageName _
= Data.Text.pack "google.protobuf.UninterpretedOption.NamePart"
fieldsByTag
= let namePart__field_descriptor
= Data.ProtoLens.FieldDescriptor "name_part"
(Data.ProtoLens.ScalarField Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.PlainField Data.ProtoLens.Required
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "namePart")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption'NamePart
isExtension__field_descriptor
= Data.ProtoLens.FieldDescriptor "is_extension"
(Data.ProtoLens.ScalarField Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(Data.ProtoLens.PlainField Data.ProtoLens.Required
(Lens.Labels.lensOf'
((Lens.Labels.proxy#) :: (Lens.Labels.Proxy#) "isExtension")))
:: Data.ProtoLens.FieldDescriptor UninterpretedOption'NamePart
in
Data.Map.fromList
[(Data.ProtoLens.Tag 1, namePart__field_descriptor),
(Data.ProtoLens.Tag 2, isExtension__field_descriptor)]
unknownFields
= Lens.Family2.Unchecked.lens
_UninterpretedOption'NamePart'_unknownFields
(\ x__ y__ ->
x__{_UninterpretedOption'NamePart'_unknownFields = y__})
defMessage
= UninterpretedOption'NamePart{_UninterpretedOption'NamePart'namePart
= Data.ProtoLens.fieldDefault,
_UninterpretedOption'NamePart'isExtension =
Data.ProtoLens.fieldDefault,
_UninterpretedOption'NamePart'_unknownFields = ([])}
instance Control.DeepSeq.NFData UninterpretedOption'NamePart where
rnf
= \ x__ ->
Control.DeepSeq.deepseq
(_UninterpretedOption'NamePart'_unknownFields x__)
(Control.DeepSeq.deepseq
(_UninterpretedOption'NamePart'namePart x__)
(Control.DeepSeq.deepseq
(_UninterpretedOption'NamePart'isExtension x__)
(())))