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