anchor.diff:       os)
     (declare (ignore os))
     (cleavir-ir:make-equal-instruction
  -   :inputs inputs (cleavir-ir:inputs instruction)
  -   :successors (cleavir-ir:successors instruction)))
  +   :inputs cleavir-ir:inputs instruction)
  +   :successors (cleavir-ir:successors instruction))
  
positive.code:      os)
    (declare (ignore os))
    (cleavir-ir:make-signed-add-instruction
     :inputs inputs (cleavir-ir:inputs instruction)
     :successors (cleavir-ir:successors instruction)))
  
  (defmethod cleavir-ir:specialize
      ((instruction cleavir-ir:fixnum-sub-instruction)
  
negative.code:      os)
    (declare (ignore os))
    (cleavir-ir:make-signed-not-greater-instruction
     :inputs cleavir-ir:inputs instruction)
     :successors (cleavir-ir:successors instruction))
  
  (defmethod cleavir-ir:specialize
      ((instruction cleavir-ir:fixnum-equal-instruction)
  