anchor.diff:  (define-simple-check cleavir-primop:cdr 1)
   (define-simple-check cleavir-primop:rplaca 2)
   (define-simple-check cleavir-primop:rplacd 2)
  +(define-simple-check cleavir-primop:fixnum-< 2)
  +(define-simple-check cleavir-primop:fixnum-<= 2)
  +(define-simple-check cleavir-primop:fixnum-> 2)
  +(define-simple-check cleavir-primop:fixnum->= 2)
  +(define-simple-check cleavir-primop:fixnum-= 2)
  +(define-simple-check cleavir-primop:fixnum-less 2)
  +(define-simple-check cleavir-primop:fixnum-not-greater 2)
  +(define-simple-check cleavir-primop:fixnum-greater 2)
  +(define-simple-check cleavir-primop:fixnum-not-less 2)
  +(define-simple-check cleavir-primop:fixnum-equal 2)
   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ;;;
  
positive.code:     ((head (eql 'cleavir-primop:fixnum-sub)) form)
    (cleavir-code-utilities:check-form-proper-list form)
    (cleavir-code-utilities:check-argcount form 3 3))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Checking FIXNUM-LESS
  
  (defmethod check-special-form-syntax
      ((head (eql 'cleavir-primop:fixnum-less)) form)
    (cleavir-code-utilities:check-form-proper-list form)
    (cleavir-code-utilities:check-argcount form 2 2))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Checking FIXNUM-NOT-GREATER
  
  (defmethod check-special-form-syntax
      ((head (eql 'cleavir-primop:fixnum-not-greater)) form)
    (cleavir-code-utilities:check-form-proper-list form)
    (cleavir-code-utilities:check-argcount form 2 2))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Checking FIXNUM-GREATER
  
  (defmethod check-special-form-syntax
      ((head (eql 'cleavir-primop:fixnum-greater)) form)
    (cleavir-code-utilities:check-form-proper-list form)
    (cleavir-code-utilities:check-argcount form 2 2))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Checking FIXNUM-NOT-LESS
  
  (defmethod check-special-form-syntax
      ((head (eql 'cleavir-primop:fixnum-not-less)) form)
    (cleavir-code-utilities:check-form-proper-list form)
    (cleavir-code-utilities:check-argcount form 2 2))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Checking FIXNUM-equal
  
  (defmethod check-special-form-syntax
      ((head (eql 'cleavir-primop:fixnum-equal)) form)
    (cleavir-code-utilities:check-form-proper-list form)
    (cleavir-code-utilities:check-argcount form 2 2))
  
negative.code: 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
  ;;; Checking FIXNUM-ADD
  
  (defmethod check-special-form-syntax
  