anchor.diff:                                          :value-type value-type
                                           :value-kind value-kind)))
       (record-protobuf-object class map-desc :map)
  -    `(progn
  -       define-map
  -       map-desc
  -       ((record-protobuf-object ',class ,map-desc :map))
  -       ,mfield
  -       ,mdata)))
  +    `((record-protobuf-object ',class ,map-desc :map)
  +      ,mfield
  +      ,mdata)))
   
   (defmacro define-oneof (name (&key synthetic-p) &body fields)
     "Creates a oneof descriptor and the defining forms for its fields.
  
positive.code: 
  DEFINE-EXTENSION:
  
  The define-extension macro defines a PROTOBUF-EXTENSION meta-object and
  set it in a PROTOBUF-MESSAGE meta-object.
  
  This meta-object details the possible range indices of proto extensions
  allowed in a protobuf message.
  
  DEFINE-EXTEND:
  
  
negative.code: - define-extend
  - define-service
  
  Inside of those macros there may also be define-* forms:
  - define-enum
  - define-message
  - define-extension
  