packages feed

protocol-buffers-0.0.2: src/DescriptorProtos/FieldOptions/CType.hs

module DescriptorProtos.FieldOptions.CType
  (CType(..))
 where

import ProtocolBuffers.Header

data CType = CORD | STRING_PIECE
  deriving (Show,Eq,Ord,Typeable)

instance OptionFlag a => Monoid (Option a CType) where
  mempty = Absent
  mappend = op'Last