anchor.diff:  (defmethod map-over-table-elements (function
                                       (table-record standard-table-output-record)
                                       type)
  -  (map-over-output-records-overlapping-region
  +  (map-over-output-records
      #'(lambda (record)
          (when (or
                 (and (row-output-record-p record)
  
positive.code: 
  (defmethod map-over-row-cells (function
                                 (row-record standard-row-output-record))
    (map-over-output-records-overlapping-region
     #'(lambda (record)
         (when (cell-output-record-p record) (funcall function record)))
     row-record +everywhere+))
  
  (defmacro formatting-row ((&optional (stream t)
                             &key (record-type 'standard-row-output-record))
  
negative.code:               (and (column-output-record-p record)
                     (member type '(:column :row-or-column))))
           (funcall function record)))
     table-record))
  
  (defun collect-block-infos (table)
    "Returns a list of BLOCK-INFOs for blocks in TABLE."
  