anchor.diff:                                   (decode-gpr32 reg (rex-r info))
                                    imm))))))
   
  +(defun decode-ev-gv-cl (context info opcode16 opcode32 opcode64)
  +  (declare (ignore opcode16))
  +  (multiple-value-bind (reg r/m)
  +      (disassemble-ordinary-modr/m context info)
  +    (if (rex-w info)
  +        (and opcode64
  +             (make-instruction opcode64
  +                               (decode-gpr64-or-mem r/m (rex-b info))
  +                               (decode-gpr64 reg (rex-r info))
  +                               :cl))
  +        (and opcode32
  +             (make-instruction opcode32
  +                               (decode-gpr32-or-mem r/m (rex-b info))
  +                               (decode-gpr32 reg (rex-r info))
  +                               :cl)))))
  +
   (defun decode-ev-gv (context info opcode16 opcode32 opcode64)
     (declare (ignore opcode16))
     (multiple-value-bind (reg r/m)
  
positive.code:     nil
      nil
      nil
      nil
      nil
      nil ; B8
      nil
      nil
      nil
      nil
      nil
      nil
      nil
      (decode-eb-gb sys.lap-x86:xadd8) ; C0
      (decode-ev-gv sys.lap-x86:xadd16 sys.lap-x86:xadd32 sys.lap-x86:xadd64)
      nil
  
negative.code:     nil
      nil
      nil
      (decode-mov-r-c) ; 20
      (decode-mov-r-d)
      (decode-mov-c-r)
      (decode-mov-d-r)
      nil
      nil
      nil
  