protocol-buffers-0.1.0: Text/DescriptorProtos/EnumValueOptions.hs
module Text.DescriptorProtos.EnumValueOptions
(EnumValueOptions(..)) where
import Prelude ((+), (++))
import qualified Prelude as P'
import qualified Text.ProtocolBuffers.Header as P'
data EnumValueOptions = EnumValueOptions{}
deriving (P'.Show, P'.Read, P'.Eq, P'.Ord, P'.Data, P'.Typeable)
instance P'.Mergeable EnumValueOptions where
mergeEmpty = EnumValueOptions
mergeAppend (EnumValueOptions) (EnumValueOptions)
= EnumValueOptions
instance P'.Default EnumValueOptions where
defaultValue = EnumValueOptions
instance P'.Wire EnumValueOptions where
wireSize 11 (EnumValueOptions) = P'.lenSize (0)
wirePut 11 self'@(EnumValueOptions)
= do P'.putSize (P'.wireSize 11 self')
wireGet 11 = P'.getMessage update'Self
where update'Self field'Number old'Self
= case field'Number of
_ -> P'.unknownField field'Number
instance P'.ReflectDescriptor EnumValueOptions where
reflectDescriptorInfo _
= P'.read
"DescriptorInfo {descName = ProtoName {haskellPrefix = \"Text\", parentModule = \"DescriptorProtos\", baseName = \"EnumValueOptions\"}, fields = fromList []}"