anchor.diff:                   (generate-non-repeated-field-deserializer
                     class index vbuf vidx temp :raw-p raw-p)
                  (if deserializer
  -                   ;; Fields contained in a oneof need to be wrapped in
  -                   ;; the oneof-data struct.
  -                   (let ((oneof-offset (proto-oneof-offset field)))
  -                     (when oneof-offset
  -                       (setf deserializer
  -                             `(make-oneof-data
  -                               :value ,deserializer
  -                               :set-field ,oneof-offset)))
  -                     (return-from generate-field-deserializer
  -                       (values (list tag) (list deserializer)
  -                               nslot rslot))))
  -               (undefined-field-type "While generating 'deserialize-object' for ~S,"
  -                                     message class field))))))
  +                   (return-from generate-field-deserializer
  +                     (values (list tag) (list deserializer)
  +                             nslot rslot))
  +                   (undefined-field-type "While generating 'deserialize-object' for ~S,"
  +                                         message class field)))))))
   
     (assert nil))
   
  
positive.code:                     (,@(if constructor (list constructor)
                             #+sbcl`(make-instance ',lisp-type)
                             #-sbcl`(funcall (get-constructor-name ',lisp-type)))
                       ;; nonrepeating slots
                       ,@(loop for temp in nslots
                               for mtemp = (slot-value-to-slot-name-symbol temp)
  
negative.code:                     (type array-index ,vidx ,vlim))
             (let (,@(loop for slot in nslots
                           collect `(,slot ,missing-value))
                   ,@(loop for oneofslot in oneofslots
                           collect `(,oneofslot (make-instance 'oneof-data)))
                   ,@rtemps)
               (loop
                 (multiple-value-setq (tag ,vidx)
  