anchor.diff:  						  :uniq uniq
   						  :index index
   						  :module module
  -						  ;:old-index old-index
  -						  ;:old-uniq old-uniq
  +						  :old-index old-index
  +						  :old-uniq old-uniq
   						  :pid pid
   						  :free-vars free-vars)
   				   p)) )))))
  
positive.code: 	(index (bytes-to-uint32 (+ 21 pos)))
  	(free-vars-length (bytes-to-uint32 bytes (+ 25 pos))))
      (multiple-value-bind* (((module pos1) (decode-erlang-atom bytes (+ 29 pos)))
  			   ((;old-index
                               pos2) (decode-erlang-integer bytes pos1))
  			   ((;old-uniq
                               pos3) (decode-erlang-integer bytes pos2))
  			   ((pid pos4) (decode-erlang-pid bytes pos3)))
        (loop
  	 repeat free-vars-length
  
negative.code: ;;;;
  ;;;; Erlang function ("Fun")
  ;;;;
      
  ;; FUN_EXT
  ;; +-----+---------+-----+--------+-------+------+-----------+
  ;; |  1  |     4   |     |        |       |      |           |
  